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1. COSA È IL BASIC? 


SOMMARIO 


Questo capitolo illustra le principali caratteristiche del linguaggio 
BASIC del Modello 20 (M20). 

Dopo un breve cenno ai due ambienti operativi presenti su questo sistema, 
il PCOS t Professional Computer Operating System) e il BASIC, si spiega 
come usare la tastiera, come eseguire calcoli immediati, come impostare 
ed eseguire un programma BASIC e quali sono le modalità operative in 
BASIC. 
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COSA E' IL BASIC? 


IL LINGUAGGIO BASIC 

IL BASIC (Beginner’s All-purpose Symbolic Instruction Code) è un 
linguaggio di alto livello e di uso generale (generai purpose). 

POSSIAMO USARE IL BASIC PER RISOLVERE SIA PROBLEMI COMMERCIALI CHE 

SCIENTIFICI. 

IL BASIC E 1 UN INSIEME DI ISTRUZIONI E COMANDI DI IMMEDIATA INTERPRETA¬ 
ZIONE. RISULTA QUINDI FACILE IMPARARLO E USARLO. 


Diverse versioni del linguaggio BASIC sono disponibili su diversi 
sistemi. La prima versione del BASIC fu sviluppata al Dartmouth College 
da John G. Kemeny e Thomas E. Kurts. D'ora in poi, parlando di BASIC, 
faremo riferimento alla versione implementata sul Modello 20 (M20). 

IL BASIC M20 E\ UNA VERSIONE DEL BASIC MICROSOFT ESTESA CON PRESTAZIONI 

GRAFICHE' E LA GESTIÓNE DELL’INTERFACCIA STANDARD IEEE 488. 


AMBIENTI PCOS E BASIC 


11 sistema M20 può essere semplicemente definito come un computer e un 
insieme di programmi forniti dalla Olivetti e residenti su un floppy disk 
da 5k in. (disco sistema). Questi programmi possono essere anche 
residenti su hard disk per i sistemi M20 con questa unità. 

Questi vengono detti "Programmi di Sistema". Questi Programmi di Sistema, 
che comprendono il PCOS e il BASIC, permettono di dare istruzioni al 
computer in un linguaggio simile alla lingua inglese. Essi convertono le 
istruzioni fornite dall'utente in un linguaggio macchina che può così 
essere interpretato dal computer. L'utente interagisce con il computer 
usando comandi PCOS e BASIC e insiemi di istruzioni che formano un 
programma BASIC. 

Nota : D'ora in avanti useremo: 

- il termine "dischetto" invece di floppy disk da 5H in. 

- il termine "disco” per specificare sia un dischetto sia l'hard disk. 
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PROGRAMMI DI SISTEMA 





Imzializzazione di un disco 








Introduzione di un programma 

Denominazione di un disco 



PCOS 


BASIC 



Lista di un programma 

Copia di un disco 








Memorizzazione su disco 
di un programma 

Lista della directory 








Esecuzione di un programma 

Assegnazione di una password 



Debugging di un programma 

Creazione di un file 


Modifica di un programma 

Protezione di un file da scrittura 


Calcoli immediati 



Disegno di figure 
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Figura 1-1 Programmi di Sistema 


USO D ELLA T ASTIERA 

La tastiera permette di impostare qualsiasi tipo di testo e di introdurre 
i caratteri di controllo. 
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Sezione Numerica 


Figura 1-2 La Tastiera (Versione USA—ASCI1) 
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COSA E' IL BASIC? 


Nota : Tutti i caratteri indicati in questo manuale si riferiscono alla 
versione USA-ASC11 della tastiera. L'Appendice B elenca le varie 
equivalenze nazionali per quei caratteri ASCII, che appaiono su video o 
su stampante. 

Quando, in questo manuale, si vuole mettere in evidenza quali sono i 
tasti che l'utente deve premere per realizzare una certa funzione, verrà 
riportata l'esatta sequenza dei tasti in negativo (caratteri bianchi su 
fondo nero). In detta sequenza possono figurare anche i tasti indicati in 
negativo nella figura 1-2. Ad esempio: 

nuHam 

Nota : Per convenzione, useremo il simbolo K£| per indicare u no q ualsiasi 
dei tre tasti di ritorno a capo/interlinea ( MB MB e Q ) e il 
simbolo W&UAM per indicare la barra spaziatrice e Hillil per indicare 
uno dei due tasti shift (solo la tastiera USA - ASCII e USA - ASCII con 
verbi BASIC hanno i due tasti Shift siglati, le altre tastiere hanno 
questi tasti privi di sigla). 

Volendo ricordare all'utente di premere per inviare una linea al 
sistema, aggiungeremo il simbolo al termine della linea medesima. 
Per esempio: 

DELETE 100 - 200 K£9 


COME INTRODURRE 1 CARATTERI 


SE l’utente... 


ALLORA... 


preme un tasto (o 
una combinazione 
di tasti) 


vuole introdurre un 
carattere minuscolo 
o il simbolo infe¬ 
riore (dei tasti 
con due simboli) 


il carattere che rappresenta viene subito 
visualizzato su video. Di volta in volta che 
l'utente imposta dei caratteri, il cursore 
(■) lampeggia e indica la posizione che verrà 
occupata dal carattere successivo 


deve semplicemente premere quel tasto, per 
esempio E| per a 


— ► 















vuole introdurre 
un carattere maiu¬ 
scolo o il simbo¬ 
lo superiore (dei 
tasti con due 
simboli) 

deve premere contemporaneamente al tasto uno 
dei due tasti oer esemoio KTXàfl KV 

per A. L'UTENTE PUÒ' ABILITARE 0 DISABILITARE 

IL FISSA MAIUSCOLE PER LE LETTERE (A-Z) 
PREMENDO KKililiClìM (vedere Caratteri di 

Controllo) 

vuole introdurre 

può usare la sezione numerica o la prima riga 

un numero 

di tasti della sezione alfanumerica 

tiene premuto un 
tasto per un tempo 
superiore al tempo 
medio di una battu¬ 
ta (mezzo secondo) 

il carattere corrispondente viene introdotto 
più volte finché il tasto non viene rilasciato 

vuole trasmettere 
una linea al siste¬ 
ma (una linea BASIC, 
un comando PCOS, o 
più dati in risposta 
a una istruzione 

INPUT o LINE INPUT) 

deve chiudere il messaggio premendo che 
posiziona il cursore all'inizio della linea 
successiva 

vuole spostare il 
cursore alla linea 
successiva (prima 
di raggiungere il 
margine del video) 

deve premere ripetutamente (o mantenere premu¬ 
to) E2S3 


CARATTERI DI CONTROLLO 

1 caratteri di controllo vengono impostati premendo contemporaneamente 
oppure ■OliilCKHB e un altro tasto. La seguente tabella riporta 
tutti i caratteri di controllo dell'M20 con relativi significati. 


SE l'utente imposta... 

ALLORA... 

WfJW U 

(Break) 

interrompe l'esecuzione di un programma. L'M20 
ritorna al BASIC (Stato Comandi) e visualizza Ok 
(se in ambiente BASIC) o ritorna al PCOS (Stato 
Comandi) e visualizza > (se in ambiente PCOS). 
Vedere anche: "Come Correggere gli Errori di Im¬ 
postazione” 

1 k 
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COSA E' IL BASIC? 


Hi:W U 

il cursore cambia forma e lampeggia e nessun 
carattere impostato in tastiera appare su video 
(Hide State) 

PER RITORNARE A VISUALIZZARE 1 CARATTERI 

L’UTENTE DEVE PREMERE NUOVAMENTE BÌÌÌI1 U 

OPPURE 

Bi:ll ili 

(Tasto di ritorno) 

l'ultimo carattere introdotto viene cancellato 
e il cursore viene arretrato di una posizione 

■■ 

(Tabulatore) 

il cursore si sposta a destra di otto posizioni 

BM 

(Reset logico) 

la memoria viene azzerata e il PCOS viene di 
nuovo caricato in memoria da disco 

HB1 Efl 

viene sospeso l'output su video. 

L'OUTPUT PUÒ' ESSERE RIPRESO IMPOSTANDO UN 

TASTO QUALSIASI 

(Escape) 

si esce dallo Stato di Inserimento Caratteri, 
pur rimanendo nello Stato di Editor (v. Cap. 3) 

ft/J 

abilita il fissa maiuscole per lettere (A-Z). 

PER DISABILITARE IL FISSAMAIUSCOLE, L'UTENTE 

DEVE PREMERE DI NUOVO Kft'.Tfflil >M 



COME CORREGGERE GLI ERRORI DI IMPOSTAZIONE 


L'utente può correggere un errore di impostazione sia prima che dopo 
aver introdotto una linea. 


SE l'utente si 
accorge... 

ALLORA... 

OPPURE... 

di un errore prima di 
aver completato una 
linea (cioè prima di 
premere W:ll 

può cancellare l'ulti¬ 
mo (o gli ultimi) ca¬ 
ratteri impostati pre¬ 
mendo una (o più volte) 
H e reimposta¬ 
re il (o i) caratteri 
errati 

può spostare il cursore 
alla linea successiva 
premendo M e 

impostarla di nuovo 
dall'inizio 
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di un errore dopo aver 
completato la linea 
(cioè dopo aver premu¬ 
to BM:M 
E SE 

si tratta di una linea 
di programma 


può sostituire la linea 
errata, introducendo 
una nuova linea con lo 
stesso numero di linea; 
LA NUOVA LINEA SOSTI¬ 
TUIRÀ' IN MEMORIA LA 
PRECEDENTE 


può entrare in Stato 
Editor e usare i coman¬ 
di dell'Editor per mo¬ 
dificare la linea (ve¬ 
dere Capitolo 3) 


CALCOLI IMMEDIATI CON L'M20 


L’utente può utilizzare il sistema M20 come una macchina calcolatrice sia 
quando vuole sapere subito il risultato di una espressione, che quando 
vuole verificare se un dato programma funziona correttamente o meno. 

Siamo in BASIC. 11 messaggio Ok appare sul video. 

L'utente può impostare il E| U (oppure più semplicemente il 

solo tasto Q, poi una espressione e 111 . 

L'espressione viene valutata e il suo valore viene visualizzato. 

L'utente può anche introdurre 11 U, poi il nome di una variabile 
(cioè una stringa di caratteri il cui primo carattere è una lettera), 
l'operatore di assegnazione (=), un'espressione e Bl . L'espressione 
viene valutata e il suo valore viene memorizzato nella variabile; questa 
può essere utilizzata in calcoli successivi per rappresentare quel 
determinato valore. 

La seguente tabella riporta alcuni esempi di calcoli immediati. 


VIDEO 


COMMENTI 


PR1NT 3 
3 
Ok 


la costante 3 viene visualizzata (possiamo clas¬ 
sificare una costante come il caso più semplice 
di espressione) _ 


PR1NT 2+3 
5 
Ok 


L'espressione 2+3 viene valutata e il suo valore 
(5) viene visualizzato 


► 
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COSA E' IL BASIC? 


LET A = 15.21 

Ok 

la costante 15.21 viene assegnata alla variabile 
A. L'utente può utilizzare la variabile A in 
calcoli successivi per rappresentare detto valo¬ 
re. 

? A-1 

14.21 

Ok 

l’espressione A-1 viene valutata e il suo valore 
(14.21) viene visualizzato. 

Nota: E' possibile impostare '?’ invece di PR1NT 

B = 2.3 

Ok 

la costante 2.3 viene assegnata alla variabile 
B. La parola chiave LET può essere omessa, l'u¬ 
tente può iniziare la linea con il nome di una 
variabile 

? A*B 

34.983 

Ok 

l'espressione A*B viene valutata. Il simbolo * 
significa moltiplicato. 11 valore 34.983 viene 
visualizzato. 

? A*B-40 
-5.017 

Ok 

l'espressione A*B-40 viene valutata e il suo 
valore (-5.017) viene visualizzato. Si noti che 
se il valore di una espressione è negativo il 
segno meno (-) viene sempre visualizzato, mentre 
se il suo valore è positivo il segno più (+) 
viene sostituito da uno spazio 

UN SEMPLICE PROGRAMMA 


Si può utilizzare il sistema M20 anche per memorizzare ed eseguire un 
programma BASIC. 

Eseguendo un programma, l'utente può risolvere problemi che non è 
possibile risolvere utilizzando il sistema M20 come una qualsiasi 
macchina calcolatrice. 

Un programma BASIC consiste di un insieme di istruzioni. 

Un'istruzione è un'entità elementare di programma che dice al BASIC di 
svolgere una ben determinata operazione. 

E' possibile impostare linee con una o più istruzioni. In questo ultimo 
caso le istruzioni vengono separate l'una dall'altra dal segno di 
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punteggiatura due punti (:). 


In un programma BASIC ogni linea inizia con un numero intero compreso tra 
0 e 65529 (estremi inclusi) e finisce quando l’utente preme il tasto 

Siamo in BASIC. Sul video appare il messaggio OK. L'utente può iniziare a 
introdurre in memoria da tastiera delle istruzioni. Ad esempio le 
seguenti : 


10 REM RETTANGOLA KJ 
20 INPUT "Base"; B liti 
30 1F B< =0 THEN 20 EH 
40 INPUT "Altezza"; H Iti 
50 1F H < =0 THEN 40 KO 
60 LET AREA = 8*H EJ 

70 PR1NT "Area=";AREA;" B=";B;" H=";H EDI 
80 GOTO 20 K£l 
90 END ELJ 


Queste istruzioni formano un programma completo. Questo programma permet¬ 
te di risolvere un problema molto semplice; il problema consiste nel 
trovare l'area di un rettangolo introducendo da tastiera i valori della 
base e dell'altezza. 

Questo esempio è stato scelto sia per la sua semplicità sia per illustra¬ 
re un certo numero di prestazioni del linguaggio BASIC. 

Non si esclude che si possano realizzare programmi più efficienti per 
risolvere lo stesso problema (vedere Capitolo 3). 

Nel programma appena esaminato abbiamo impostato un'istruzione per ogni 
linea, ma avremmo anche potuto impostarne più di una, (utilizzando il 
separatore due punti (:)), riducendo così il numero di linee. Ad esempio: 


10 REM RETTANGOLA Eli 
20 INPUT "Base";B: 1F B =0 THEN 20 Eli 
30 INPUT "Altezza";H: 1F H<=0 THEN 30 »■(:■ 
40 LET AREA=B*H 

50 PRINT "Area=";AREA;" B=";B;" H=";H EJI 
60 GOTO 20: END EJI 
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COSA E' IL BASIC? 


L'utente può introdurre fino a 255 caratteri per ogni linea (logica), 
compreso il numero di linea. Una linea logica può comprendere più linee 
fisiche. Per esempio: 

20 INPUT "8ase";B: 1F B<=0 
THEN 20 

è una linea logica comprendente due linee fisiche. Per cambiare linea 
prima di raggiungere il margine del video, l'utente deve premere una o 
più volte K2EH- 

PAROLE CHIAVE (KEYUORDS) 

Ogni istruzione incomincia con una parola chiave, che è una parola 
riservata. Una parola chiave è una parola mnemonica della lingua inglese. 
Dal punto di vista sintattico, deve essere preceduta e seguita da almeno 
uno spazio. 

Nota : Una parola chiave non può essere usata come nome di una variabile. 

La parola chiave indica il tipo d'istruzione da eseguire. Dopo la parola 
chiave l'utente può introdurre uno o più operandi (costanti o variabili) 
o espressioni. Alcune istruzioni hanno più di una parola chiave ad 
esempio 1F... THEN. Le istruzioni del nostro programma contengono le 
parole chiave REM, INPUT, 1F... THEN, LET, PR1NT, GOTO e END. L'utente 
può introdurre le parole chiave sia in lettere maiuscole che in lettere 
minuscole. In quest'ultimo caso vengono convertite in lettere maiuscole 
quando si lista il programma (vedere Capitolo 2). 

In BASIC sono parole riservate sia le parole chiave sia i nomi dei co¬ 
mandi (per esempio RUN, LIST, ecc...) e i nomi di funzione (per esempio 
SIN, COS, ecc...). Vedere Appendici C,D e E per una lista completa. 

COSTANTI 

1 numeri scritti in un programma BASIC (quali ad esempio 0, 150,-31.7) 
vengono denominati "costanti numeriche" e le stringhe di caratteri (quali 
"Base", "Altezza", "Area=", " B=" e " H=") vengono denominate "costanti 
stringa". Questo significa che i loro valori rimangono gli stessi durante 
tutto il programma. Per esempio, quando la costante 150 appare in un pro¬ 
gramma, questo valore resta immutato per tutta la durata del programma. 

Le costanti numeriche possono essere numeri interi (ad es; 150) o meno 
(numeri "reali"), ad es. -31.7. 
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Le costanti stringa sono sempre comprese fra virgolette, a meno che non 
venga specificato altrimenti. Stringhe non comprese tra virgfllette sono 
ammesse ad esempio all'interno di istruzioni DATA o in risposta a una 
istruzione INPUT o LINE INPUT. 

Per ulteriori dettagli vedere Capitolo 4. 


VARIABILI 

In un programma se un dato viene rappresentato da un nome, il suo valore 
può variare durante l'esecuzione. Si parla in questo caso di una 
"variabile” anziché di una "costante". Il nome di una variabile non può 
essere più lungo di 40 caratteri. 11 primo carattere deve essere una 
lettera. Esempi di variabili nel nostro programma sono: 

B , H , AREA 

Come abbiamo visto per le parole chiave, i nomi delle variabili possono 
essere introdotti sia in lettere maiuscole che minuscole. In quest'ultimo 
caso vengono convertite in lettere maiuscole quando si lista il 
programma. 

Una variabile può essere una "variabile semplice" (ad es. le predette 
variabili L, U, AREA) oppure una "variabile con indice". 

Una varibile con indice è un elemento di matrice ("array"), cioè un 
elemento di una collezione di variabili che hanno tutte lo stesso nome. 1 
vari elementi della matrice si distinguono tramite uno (o più) indici 
scritti tra parentesi tonde subito dopo il nome comune. Per esempio, se A 
è il nome di una matrice a una dimensione, A (0) è il suo primo elemento, 
A(1) il secondo ecc.. 

Una matrice può avere un numero qualsiasi di dimensioni. Una matrice a 
una dimensione può essere considerata come una lista di dati. Una matrice 
a due dimensioni può essere considerata una tabella di dati. In questo 
caso il primo indice individua la riga della tabella e il secondo la 
colonna. Per esempio B{1,2) rappresenta il valore appartenente alla 
seconda riga e alla terza colonna. 

Per ulteriori informazioni vedasi il Capitolo 4. 


FUNZIONI 

Possiamo classificare le funzioni come funzioni di sistema ("built-in 
functions") o definite dall'utente ("user-defined functions"). 

Parleremo brevemente qui di funzioni di sistema, mentre le funzioni 
definite dall'utente verranno illustrate nel seguito (vedasi Capitolo 9 
dove si possono anche trovare ulteriori dettagli sulle funzioni di 
sistema). 
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COSA E' IL BASIC? 


Le funzioni di sistema consentono di eseguire molte tra le più comuni 
funzioni matematiche, quali la radice quadrata, il seno o il logaritmo o 
funzioni per l’elaborazione delle stringhe (quali l’estrazione di una 
sottostringa). E’ sufficiente scrivere il nome di una di queste funzioni 
in un'istruzione, perché la funzione venga eseguita. Al nome della fun¬ 
zione può seguire, in parentesi tonde, il valore di uno o più argomenti 
(per esempio SIN(1.5)). 

Una funzione può essere un operando nell'ambito di una espressione (ad 
es. 1+2*C0S(.4)) e gli argomenti possono anche essere delle espressioni 
(ad es. L0G(45/7)). 

Per esempio: 

5IN(1,5) 

1+2*C0S(.4) 

L0G(45/7) 

SQR(10) 

ESPRESSIONI 

Possiamo classificare le espressioni in 4 categorie: 

- espressioni numeriche 

- espressioni stringa 

- espressioni di confronto 

- espressioni logiche 

Parleremo brevemente qui dei primi tre tipi di espressioni, mentre le 
espressioni logiche verranno definite più avanti (vedi Capitolo 6, dove 
descriveremo anche gli altri tipi di espressioni più in dettaglio). 


è .997495 (SIN calcola il seno dell'argomen¬ 

to) 

è 2.84212 (COS calcola il coseno dell'argomen¬ 

to) 

è 1.86075 (LOG calcola il logaritmo naturale 

dell'argomento) 

è 3.16228 (SQR calcola la radice quadrata 

dell'argomento) 


Espressioni numeriche 

Un'espressione numerica può essere una costante numerica, una variabile 
numerica semplice, una variabile numerica con indice, una funzione 
numerica o una successione di questi elementi legati tramite simboli 
speciali, detti "operatori numerici". 


1-11 




Gli operatori numerici sono: 


+ addizione (es. A+B+C) 

Sottrazione (ES. A-B) 

\ divisione tra interi (gli operandi vengono arrotondati all'intero più 
vicino prima che la divisione venga eseguita e il quoziente viene 
troncato a valore intero, per es. 25.68 \ 6.99 è 3) 

MOD divisione modulo (fornisce quel numero intero che è il resto di una 
divisione tra interi, per es. 25.68 MOD 6.99 è 5, dato che 26/7 è 3 
con resto 5) 

* moltiplicazione (es. A*B) 

/ divisione (es. A/B) 

cambiamento di segno (es. -A è 35, se A vale - 35) 

A elevamento a potenza (es. A AB) 


Espressioni stringa 

Un'espressione stringa può essere una costante stringa, una variabile 
semplice stringa, un variabile stringa con indice, una funzione stringa o 
una successione di questi elementi concatenati mediante il segno di 
addizione ( + ). 

Utilizzando questo segno le stringhe possono essere "concatenate", cioè 
al primo valore stringa viene aggiunto in coda il secondo e così via fino 
a ottenere un'unica stringa risultante. 

Per esempio: 

13 A$ = "Chicago," 

20 BS = "IL.," 

30 C$ = A$t-B$+"U5A" 

La concatenazione nell'istruzione 30 farà sì che venga assegnato alla 
variabile stringa C$ il valore: 

Chicago,IL.,USA 
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Epressioni di confronto 

Dette espressioni confrontano due espressioni numeriche oppure due e- 
pressioni stringa per mezzo di un operatore di confronto. 

Gli operatori di confronto sono: 

uguale a 
maggiore di 
minore di 

maggiore di o uguale a 
minore di o uguale a 
diverso da 

11 risultato di un'espressione di confronto può essere vero o falso e può 
essere usato per decidere dove passare il controllo dell'esecuzione di un 
programma. 

Per esempio è stata usata un'espressione di confronto nell'istruzione: 

30 1F L< =0 THEN 20 

Questa istruzione fa ritornare il controllo all'istruzione 20 se il va¬ 
lore della variabile L è negativo o uguale a zero. 


> 

< 

>= o => 
<= o =< 
<>0 >< 


USO DEGLI SPAZI 

L'utente, per rendere il suo programma più leggibile, può introdurre 
degli spazi in qualsiasi posizione. Infatti non ci sono limitazioni 
nell'uso degli spazi, ad eccezione delle seguenti: 

- almeno uno spazio deve precedere e seguire una parola chiave, 

- gli spazi sono significativi solo all'interno delle costanti stringa, 

- gli spazi non sono ammessi all'interno delle costanti numeriche (inclu¬ 
si i numeri di linea), le parole chiave, i nomi delle variabili e i 
nomi delle funzioni. 

Per esempio: 

20 INPUT "Base";B 
e 

20 INPUT "Base"; B 
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sono istruzioni equivalenti, ma 


20 INPUT "B a s e";8 

è una istruzione diversa, dato che contiene una stringa di caratteri più 
lunga. 


COMMENTI 

L'utente può documentare il proprio programma tramite l'istruzione REM 
(Remark). Dopo la parola chiave REM è possibile scrivere una qualsiasi 
stringa di caratteri stampabili ASCII. Per esempio: 

10 REM RETTANGOLA M;B 

E' anche possibile inserire commenti in un programma introducendo una 
stringa di caratteri stampabili ASCII preceduta da un apostrofo (') e 
chiusa da H:1 

Questa stringa è detta "campo commento". 

Per esempio: 

80 GOTO 100 'Cicla indefinitamente B4;B 

Sia le istruzioni REM, sia i campi commento possono essere inseriti in un 
punto qualsiasi di un programma. Dal punto di vista dell'esecuzione due 
programmi uno con, l'altro senza commenti sono assolutamente equivalenti, 
ma i commenti figurano nel listing (lista) del programma e consentono di 
avere un programma di facile comprensione in quanto "autodocumentato". 
Per ulteriori dettagli vedere Capitolo 2. 


ESECUZIONE DEL PROGRAMMA 

Proviamo a eseguire il programma che calcola l'area di un rettangolo. Se 
le linee del programma sono state impostate in tastiera una dopo l'altra 
(e l'M20 non è stato spento nel frattempo) il programma è in memoria. 
Impostiamo: BW il H il Bit:! : il listing del programma apparirà su 
video. Alla fine del listing appare Ok. 

Impostiamo allora B:B Ili DB M:H . 
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VIDEO 


LIST 

10 REM RETTANGOLOI 
20 INPUT "Base";B 
30 1F B< = 0 THEN 20 
40 INPUT "Altezza";H 
50 1F H< =0 THEN 40 
60 LET AREA=B*H 
70 PR1NT "Area=";AREA 
80 GOTO 20 
90 END 
Ok 
RUN 

Base? 3.5 
Altezza? 4.2 
Area= 14.7 B= 3.5 
Base? -7.3 
Base? 7.3 
Altezza? 1.3Q 
?Redo from start 
Altezza? 1.32 
Area= 9.636 B= 7.3 
Base?AC 
Break in 20 


COMMENTI 


l’M20 inizia a eseguire le istru¬ 
zioni in modo sequenziale a par¬ 
tire dall'istruzione 10 (che in 
questo caso non viene eseguita 
dato che è un commento). 


" B=";B;" H=";H 


H= 4.2 


H= 1.32 


Quando il controllo raggiunge una 
istruzione INPUT (vedere le i- 
struzioni 20 e 40) l'esecuzione 
del programma viene sospesa e 
l'M20 emette un messaggio indi¬ 
cando all'utente che deve intro¬ 
durre un valore da tastiera. Ad 
esempio possiamo impostare 3.5 
per la base e 4.2 per l’altezza. 

L'istruzione 60 calcola il valore 
della variabile AREA. L'istruzio¬ 
ne 70 visualizza questo valore, 
come pure i valori delle variabi¬ 
li B e H. L'istruzione 80 riporta 
il controllo all'istruzione 20. 


Se l'utente introduce un valore 
negativo per B (ad es.-7.3), 
l'istruzione 20 viene eseguita di 
nuovo, dato che l'istruzione 30 
ritorna il controllo all'istru¬ 
zione 20 se il valore di B è 
negativo o zero. 


Se l'utente introduce un valore 
negativo di H, l'istruzione 40 
viene eseguita di nuovo, dato che 
l'istruzione 50 ritorna il con¬ 
trollo all'istruzione 40, se il 
valore di H è negativo o zero. 


Se l'utente introduce un valore 
stringa per 3 o H (ad es.1.3Q 
per H) l'M20 visualizza un mes¬ 
saggio d’errore: 


?Redo from start 
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e l'utente deve introdurre un 
nuovo valore. L'esecuzione di 
questo programma termina solo se 
l'utente preme H . In tal 
caso l'M20 visualizza un mes¬ 
saggio di interruzione (Break) e 
passa in Stato Comandi. Per ri¬ 
prendere l'esecuzione l'utente 
deve impostare : 

HOOH Bi¬ 


modali™ • OPERATIVE 


Il BASIC ha tre modalità operative. 


MODALITÀ' OPERATIVE 



Figura 1-3 Modalità Operative 


STATO COMANDI 


Quando l'M20 entra in Stato Comandi, visualizza il messaggio: 


Ok 


In Stato Comandi, il BASIC non accetta ciò che l'utente imposta in 
tastiera finché l'utente non preme HJ . 
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COSA E' IL BASIC? 


Linee Programma e Linee Immediate 

L'M20 non prende in considerazione eventuali spazi iniziali su una linea 
BASIC, ma interpreta il primo carattere diverso da uno spazio. Se questo 
carattere non è una cifra, il BASIC considera la linea come una "linea 
immediata" (cioè ad esecuzione immediata). Se è una cifra, il BASIC 
considera la linea come una "linea di programma" (vedere più avanti). 


SE... 

ALLORA... 

l'utente imposta una 

la linea viene trasferita in memoria, quando 

linea di programma, 

l'utente preme La linea non viene 

cioè un numero di li- 

eseguita finché l'utente non imposta O UK U 

nea (tra 0 e 65529), 

Hill Per esempio: 

seguito da uno o più 
comandi o istruzioni 

100 PR1HT "11 LOG di 5 è";L0G(5) 

BASIC separati da due 
punti (:) e alla fine 

è una "linea di programma". Quando l'utente 

preme 

preme G3, il BASIC trasferisce in memoria la 
linea. Per eseguire la linea si deve impostare 

[3 0 0 141 

l'utente imposta una 

la linea viene eseguita non appena l'utente 

linea immediata, cioè 

preme IH. 

uno o più comandi o 
istruzioni BASIC se- 

PR1NT "11 LOG di 5 è";L0G(5) 

parati da due punti 
(:) e alla fine 

è una "linea immediata". Quando l'utente preme 

preme B1 

Bl. il BASIC la esegue. 

l'utente imposta una 

le linee vengono trasferite in memoria in modo 

sequenza di linee di 

da formare un programma BASIC. 

programma. 

Queste linee vengono memorizzate secondo la 
sequenza dei numeri di linea, indipendentemente 
dall'ordine in cui sono state introdotte. 


11 programma non viene eseguito finché l'utente 
non imposta KH IH B.'M MU 
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Nodi 


Lo Stato Comandi comprende i seguenti Modi: 

- Modo Immediato (o Diretto), quando l'utente imposta una linea ad 
esecuzione immediata 

- Modo Programma, quando l'utente imposta una linea di programma. 

STATO ESECUZIONE 

Si dice che il sistema M20 è in Stato Esecuzione, quando esegue sia 
istruzioni o comandi BASIC (Stato Esecuzione BASIC), sia comandi PCOS 
(Stato Esecuzione PCOS). 

Un programma BASIC viene eseguito secondo la sequenza ascendente dei 
numeri di linea, a meno che un'istruzione di controllo come GOTO, 

ON — GOTO, IF — THEN_ELSE, 1F...GOTO...ELSE, FOR/NEXT, UHILE/WEND 

specifichi altrimenti. 


STATO EOITOR DI LINEA 

11 sistema BASIC comprende un Editor per poter correggere le linee di 
programma. Questo è molto utile per poter modificare linee lunghe e 
complesse senza bisogno di riscriverle completamente. 


SE l’utente deside¬ 
ra modificare... 

ALLORA egli deve impostare... 

il BASIC visua¬ 
lizza 

la linea attuale 
(numero di linea 

11...1) 

U O U U KZM* 

— B1 

11...1 

una linea specifi¬ 
cata (numero di 
linea nn...n) 

Il LI U U mWAÈ 

o n.. n iti 

nn...n 


Nota : La linea attuale è 1[ultima linea impostata, modificata o che ha 
dato luogo a un messaggio d'errore. 

Se l'M20 entra in Stato Editor, l'utente può incominciare a modificare la 
linea (cancellando, inserendo e rimpiazzando i caratteri) facendo uso dei 
comandi dello Stato Editor (vedere Capitolo 3). 
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COSA E' IL BASIC? 


In Stato Editor il BASIC prende in esame i caratteri introdotti da 
tastiera di volta in volta che vengono impostati, senza aspettare che 
l'utente prema HI . 

Impostando H:1 il BASIC esce dallo Stato Editor. 


Errori di Sintassi 

Se durante l'esecuzione di una linea di programma viene riscontrato un 
errore sintattico, il sistema M20 visualizza: 

Syntax error in nn...n 

Ok 


e automaticamente entra in Stato Editor. 

Qui nn...n sta a indicare il numero di linea dove è stato riscontrato 
1'errore. 


Stati dell'Editor 

L'Editor include i seguenti Stati: 

- Stato Cancellazione 

- Stato Modifica 

- Stato Inserimento 

Per entrare e uscire da questi Stati l'utente deve usare i corrispondenti 
comandi dell'Editor (vedere Capitolo 3). 


ISTRUZIONI E COMANDI BASIC 

Risulta a volte difficile distinguere un'istruzione BASIC da un comando 
BASIC, poiché entrambi possono essere usati in un programma o in una 
v linea immediata, ma: 

- le istruzioni BASIC sono generalmente usate in linee di programma e 
vengono impostate in sequenza per formare un programma (eccezione fatta 
per PR1NT, LPR1NT, LET e SWAP che sono anche usate spesso in linee 
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immediate, quando viene usato l'M20 come una macchina calcolatrice sia 
per visualizzare subito il risultato di un calcolo, sia per verificare 
se un programma è corretto visualizzando il contenuto delle variabili 
di programma) 

- 1 comandi BASIC sono usati per la gestione dei files o per lanciare 
programmi di servizio (Utilities) come per esempio quando si listano i 
programmi o si azzera la memoria. Essi sono generalmente usati in linee 
immediate eccezione fatta per K1LL, LOAD, RUN, SYSTEM, TROFF, TRON e 
W1DTH che sono usati con una certa frequenza anche in un programma. 

Nel seguito del manuale, quando verrà introdotta una istruzione o un 

comando o una funzione BASIC, scriveremo a fianco del suo nome: 

- (IMMEDIATO), se può essere usato solo in modo immediato 

- (PROGRAMMA), se può essere usato solo in un programma 

- (PR0GRAMMA/1MMED1AT0), se può essere usato sia in un programma, sia in 
modo immediato. 


COME CAMBIARE M ODAL ITÀ' 0 AMBIENTE 

E' possibile cambiare modalità operative (Stato Comandi, Esecuzione, 
Editor) o ambiente (PCOS o BASIC) se l'utente imposta un apposito comando 
o se si verificano determinate condizioni. 

La seguente tabella indica tutti i casi possibili. 


SE l'M20 è in... 

E SE... 

ALLORA... 

BASIC 

(Stato Esecuzione) 

l'utente imposta 

U 

mentre l'M20 sta ese¬ 
guendo un programma 

BASIC o una linea 
a esecuzione 
immediata 

l'esecuzione viene in¬ 
terrotta e l'M20 entra 
nello Stato Comandi 
BASIC 
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COSA E' IL BASIC? 



l'utente imposta: 

rana 

la memoria viene az¬ 
zerata e il PCOS viene 
nuovamente caricato ir. 
memoria 


viene riscontrato un 
errore sintattico 

l'M20 entra in Stato 
Editor alla linea che 
ha causato l'errore 


l'esecuzione di un 
programma o di un 
comando BASIC viene 
portata a termine 

OPPURE 

viene riscontrato 
un errore (escluso 
un errore sintattico) 
OPPURE 

viene incontrata 
una istruzione 

STOP (o END) 

l'M20 entra in Stato 
Comandi BASIC 

BASIC 

(Stato Comandi) 

l'utente imposta una 
linea immediata 

l'M20 entra in Stato 
Esecuzione (sempre in 
ambiente BASIC), ese¬ 
gue la linea immediata 
e ritorna in Stato 
Comandi BASIC. 


l'utente imposta 

HUUUUU 

B1 

Nota: SYSTEM può anche 
essere usato in un 
programma BASIC. 

l'M20 entra in PCOS e 
viene azzerata sia la 
memoria a disposizione 
dell'utente, sia la 
memoria dove è alloca¬ 
to il BASIC. 


1-21 





















l'utente imposta 

uuuu kzhs 

EH EH*••EH Mà'M 

oppure: 

iiuuu mai 
n Gii 

l'M20 entra in Stato 
Editor di Linea 


l'utente preme: 

i am wsz&a 

la memoria viene az¬ 
zerata e il PCOS viene 
nuovamente caricato in 
memoria 

Stato Editor 

l'utente preme 

l'M20 entra in Stato 

di Line 


Comandi BASIC.(L'ulti¬ 
ma linea modificata 
viene visualizzata). 

Le variabili di pro¬ 
gramma vengono azzera¬ 
te (cioè le variabili 
numeriche poste a zero 
e le variabili stringa 
poste uguali alla 
stringa nulla). 


l'utente preme 

l'M20 entra in Stato 


(Exit) 

Comandi BASIC. (La 
parte restante del¬ 
l'ultima linea mo¬ 
dificata non viene 
visualizzata). Le va¬ 
riabili di programma 
vengono azzerate. 

1 


l'utente preme Kl 

l'M20 entra in Stato 


(Quit Editing) 

Comandi BASIC e can¬ 
cella tutte le even¬ 
tuali modifiche fatte 
sulla linea. 

Le variabili di pro¬ 
gramma mantengono il 
loro valore. 
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COSA E' IL BASIC? 




l'utente preme 

mm Effla 

la memoria viene az¬ 
zerata e il PCOS viene 
nuovamente caricato in 
memoria 

PCOS 


l'utente imposta 

UUHJ 

il BASIC viene carica¬ 
to in memoria e l'M20 
entra in Stato Comandi 
BASIC 



l'utente imposta 
qualsiasi altro 
comando PCOS 

l'M20 entra in Stato 
Esecuzione (sempre in 
ambiente PCOS). 



l'utente imposta: 

hlw^i 

la memoria viene az¬ 
zerata e il PCOS viene 
nuovamente caricato in 
memoria 



l'utente imposta un 
identificatore di 
file (corrispondente 
a un programma BASIC) 
che sia stato regi¬ 
strato con l'esten¬ 
sione BAS (per es. 
F1LEA.BAS) 

OPPURE 

l'utente imposta il 
comando BASIC segui¬ 
to da un identifi¬ 
catore di file, 
corrispondente ad 
un programma BASIC 
(per es. BA FILEB) 

L'M20 entra in BASIC 
(Stato Esecuzione) e 
viene eseguito il pro¬ 
gramma specificato 
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2. INTRODUZIONE, LISTING ED ESECUZIONE 
DI UN PROGRAMMA 


SOMMARIO 


Questo capitolo illustra la sintassi adottata nel manuale per descrivere 
la struttura di una istruzione o di un comando o di una funzione; viene 
quindi spiegato come documentare un programma, come introdurlo in 
memoria da tastiera, come listarlo, trasferirlo da memoria a disco e 
viceversa e come eseguirlo. 
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INTRODUZIONE. LISTING ED ESECUZIONE DI UN PROGRAMMA 


SINTASSI ADOTTATA 


La sintassi adottata per descrivere la struttura di un comando, di 
un'istruzione o di una funzione BASIC si basa sui diagrammi sintattici 
(syntax diagrams). 

Un diagramma sintattico è un grafo con una sola entrata ed una sola 
uscita. Ogni percorso attraverso il grafo rappresenta una possibile 
sequenza di simboli. 

La seguente tabella enumera le regole da seguire per disegnare un 
diagramma sintattico. 


N° REGOLA 


1 tutte le parole e tutti i 

simboli racchiusi in ova¬ 
li o in cerchi devono es¬ 
sere impostati esattamen¬ 
te come indicato nella 
sintassi ; 


ESEMPIO 


tutte le parole racchiuse 
in un rettangolo rappre¬ 
sentano nomi di parametri 
usati in istruzioni o co¬ 
mandi o funzioni; 



il significato di ogni 
parametro viene descritto 
nel testo che segue alla 
sintassi (quando non è di 
immediata interpretazio¬ 
ne) . 


2 una diramazione indica 

una scelta: l'utente deve 
scegliere uno dei percor¬ 
si . 

Per esempio, dopo RUN è 
possibile: 

- impostare un numero di 
linea 



► 


OPPURE 






















3 


4 


5 


6 


- un identificatore di 
file 


una diramazione senza pa¬ 
rametri indica che l'al¬ 
ternativa è un "bypass" 
(vedere nell’esempio il 
percorso che supera 
l'opzione ,R) 




un ciclo di ritorno (loop) 
indica che un parametro 
può essere ripetuto. Per 
esempio, il parametro ”va- 
riable" può essere ripe¬ 
tuto n volte in un'istru¬ 
zione READ, e ogni "va- 
riable" deve essere se¬ 
parata dalla successiva 
da una virgola 



questo manuale indica in 
lettere maiuscole le pa¬ 
role riservate del BASIC, 
anche se l'utente può 
impostarle in lettere mi¬ 
nuscole. Alcuni esempi di 
parole riservate sono in¬ 
dicati a lato (sono le 
parole chiave del nostro 
programma RETTANGOLO!) 


REM 

INPUT 

1F...THEN 

LET 

PR1NT 

GOTO 

END 


anche i nomi dei comandi 
PCOS sono mnemonici. Per 
esempio: 

BASIC - va in BASIC 
VCOPY - copia un volume 
ecc. 

L'utente può introdurli 
in lettere minuscole o in 
maiuscole. Vengono normal¬ 
mente introdotti in lette¬ 
re minuscole e in forma 
abbreviata (solo le prime 
due lettere), come indica¬ 
to nel programma sintatti¬ 
co qui a lato 
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INTRODUZIONE» LISTING ED ESECUZIONE DI UN PROGRAMMA 


COME DOCUMENTARE UN PROGRAMMA 


Spesso l'utente desidera inserire commenti in un programma per renderlo 
più leggibile e di più immediata comprensione. Ciò può essere fatto in 
due modi: 

- utilizzando istruzioni REM 

- utilizzando campi commenti. 


REM/CAMPI COMMENTI (PROGRAMMA) 


L'istruzione REM (Remark) è una delle possibilità offerte dal BASIC per 
documentare un programma. L'utente può inserire qualsiasi stringa di 
caratteri dopo REM. Un'altra possibilità offerta dal BASIC è quella di 
inserire un campo commento, cioè una stringa di caratteri preceduta da un 
apostrofo (') e chiusa da M:M . 



Figura 2-1 Istruzione REM 



string of 
characters 


Figura 2-2 Campo Commento 








Esempi 


SE l'utente imposta. . . 

ALLORA... 

10 REM RETTANGOLO! 

una istruzione REM dà il titolo al 
vostro programma. E' buona norma di 
programmazione dare sempre un tito¬ 
lo a ogni programma 

100 REM SUBR0UT1NE1 

una istruzione REM segna l'inizio 
di una subroutine (vedere capitolo 
10). E' buona norma di programma¬ 
zione dare sempre un titolo a ogni 
subroutine 

10 ' RETTANGOLA Gii 

un campo commento dà il titolo al 
vostro programma. 

Nota: In questo caso l'apostrofo ha 
la stessa funzione della parola 
REM, dato che il campo commento 
occupa un'intera linea 

150 LET A=(A1+A2)/2 'Media K£1 

un campo commento è inserito a fine 
istruzione 


Note 

Una istruzione REM non può essere seguita da altre istruzioni su una 
stessa linea, ma può essere l'ultima istruzione di una linea che contiene 
più istruzioni. 

Un campo commento può: 

- occupare un’intera linea (in tale caso l'apostrofo ha la stessa 
funzione di una istruzione REM) 

- essere inserito a fine istruzione. 

Sia le istruzioni REM, sia i campi commento possono essere inseriti in 
qualsiasi punto del programma. Non sono istruzioni eseguibili, ma appaio¬ 
no nel listing. 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 


INTRODUZIONE DI UH PROGRAMMA DA TASTIERA 

Il messaggio OK é sul video. 11 BASIC é in attesa che l'utente introduca 
dei caratteri da tastiera. E' possibile iniziare subito introducendo 
la prima istruzione iniziando a impostare il numero di linea (ad esempio 
10). Però l'utente può anche richiedere che il sistema faccia la numera¬ 
zione automatica di linee. Questa richiesta viene fatta tramite il coman¬ 
do AUTO (descritto in seguito). 

Però se l'utente ha già introdotto un programma e vuole introdurne un 
altro, deve, per prima cosa, impostare il comando NEW, che azzera la 
memoria. 

11 programma può anche essere cancellato dalla memoria sia caricando 
un nuovo programma da disco, sia introducendo un comando SYSTEM (per 
tornare al PCOS), sia spegnendo la macchina. In guesti casi, é opportuno 
che l'utente, in precedenza, registri il programma su disco (a meno 
che già non ne abbia una copia). 

Impostiamo il programma (RETTANGOLOI) in tastiera. Per prima cosa 
impostiamo: 

ElllEl mimm Kìi 

Poi introduciamo: 

10 REM RETTANGOLOI 

20 INPUT "Base";8 Iti 

30 1F B<-0 THEN 20 Iti 

40 INPUT "Altezza";H B1 

50 IFH< =0 THEN 40 B1 

60 LET AREA = B*H Iti 

70 PR1NT "Area="; AREA;"8=";B;"H=";H Iti 

80 GOTO 20 Iti 

90 END 

Conviene usare un intervallo di 10 fra ogni numero di linea. Questo 
permette all'utente di modificare facilmente un programma inserendo 
istruzioni fra le linee già esistenti. 

Le linee di programma sono ordinate in memoria secondo la sequenza del 
numero di linea, non nell'ordine in cui sono state introdotte in tastie¬ 
ra. 
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Per esempio, se impostiamo prima l'istruzione 50, poi la 10 eco... fino a 
impostarle tutte ma in un ordine qualsiasi noi introduciamo in memoria 
il medesimo programma. 

L'utente può introdurre parole chiave e nomi di variabili sia con lettere 
maiuscole che con lettere minuscole. Queste ultime verranno convertite 
nelle corrispondenti maiuscole quando si richiede il listing del pro¬ 
gramma. 


AUTO (IMMEDIATO) 

Fa iniziare la numerazione automatica delle linee. 



Figura 2-3 Comando AUTO 

Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

VALORI DI 

DEFAULT 

line number 

è il primo numero 
di linea generato 

10 se viene omesso 
anche il parametro 
interval; in ogni 
altro caso 0. 


il primo numero 
di linea generato 
è il numero della 
linea attuale 

10 

interval 

è 1'intervallo tra 
i numeri di linea 

10 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 


Esempi 


SE l'utente imposta... 

ALLORA la numera¬ 
zione di linea inizia... 

E l'intervallo di 
linea è... 

AUTO M:» 

alla linea 10 (va¬ 
lore di default) 

10 (valore di de¬ 
fault) 

AUTO ..30 B1 

alla linea attua¬ 
le 

30 

AUTO 100 

alla linea 100 

10 (valore di de¬ 
fault) 

AUTO 150, Ma 

alla linea 150 

l'ultimo intervallo 
specificato da un 
precedente comando 
AUTO oppure 10 il 
valore di default) 
se non é stato impo¬ 
stato un comando 
AUTO in precedenza. 

AUTO 200,20 Ma 

alla linea 200 

20 

AUTO , 3 Iti 

alla linea 0 

3 


Un Asterisco dopo un Numero di Linea 


SE... 

ALLORA... 

AUTO genera un numero 
di linea già esistente 

un asterisco compare sul video dopo il numero 
di linea per avvertire l’utente che egli sta 
per sostituire una linea già esistente. Comun¬ 
que, premendo immediatamente dopo l'aste¬ 
risco, si lascia inalterata la linea esistente 
e si genera il prossimo numero di linea. 


Nota: Questo può succedere solo se si introduce 
AUTO quando un programma è già esistente in 
memoria. 
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Per Terminare la Numerazione Automatica 


SE 1'utente imposta... 


ALLORA... 


W1M U 


la numerazione automatica viene 
l'M20 entra in Stato Comandi. 


interrotta e 


Nota : Quando si imposta I M MiM la linea 
attuale viene cancellata 


NEU ( PROGRAMMA/IMfED IATO) 

Cancella il programma residente in memoria e le variabili, permettendo 
all'utente di introdurre un nuovo programma. 

NEU setta a zero il bit di "trace" (tracciamento) allo stesso modo del 
comando TROFF (vedere capitolo 13) e chiude tutti i file dati (vedere 
capitolo 12). 



Figura 2-4 Comando NEU 


Esempi 


SE l'utente imposta... 

ALLORA...- 

NEU 03 

il programma residente in memoria viene 
cancellato, insieme alle sue variabili. 

10 REM RETTANG0L01 03 

L'utente introduce un nuovo programma da 


tastiera. 

20 INPUT "Base"; B 03 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 


Nota : Non è necessario impostare NEW prima 
di trasferire in memoria un programma da 
disco, tramite il comando LOAD o RUN (questi 
comandi azzerano la memoria automaticamen¬ 
te). 


COME LISTARE UN PROGRAMMA 


Quando un programma è in memoria, può essere listato. Per listare un 
programma, l'utente può introdurre il comando LIST (il "listing" 
comparirà sul video), oppure il comando LL1ST (il "listing" comparirà su 
stampante). L'utente non può listare un programma protetto (registrato 
con l'opzione P). 

Quando si lista un programma le parole riservate (parole chiave, nomi di 
variabile e nomi di funzione) che l'utente aveva impostato in lettere 
minuscole, vengono convertite in lettere maiuscole e il punto interroga¬ 
tivo (?) eventualmente usato al posto della parola chiave PR1NT viene 
convertito in PR1NT. Inoltre le linee vengono visualizzate per numero di 
linea crescente indipendentemente dall'ordine con cui sono state 
impostate. 

Per listare il programma RETTANGOLO) sul video, impostiamo W H 
■EOI- Sul video apparirà: 


LIST 

10 REM RETTANGOLO) 

20 INPUT "Base";B 
30 1F L<=0 THEN 20 
40 INPUT "Altezza";H 
50 1F H<=0 THEN 40 
60 LET AREA=B*H 

70 PR1NT "Area=";AREA;" B=";B;" H=";H 
80 GOTO 20 
90 END 
OK 
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Alla fine della lista l'M20 entra in Stato Comandi e visualizza OK. 


L1ST/LL1ST (IMMEDIATI) 


LIST lista le linee di programma sul video, LLIST lista le linee di 
programma su stampante. 





Figura 2-5 Comando LIST 






Figura 2-6 Comando LLIST 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 


Esempi 


SE l'utente imposta... 

ALLORA... 

LIST K&l 

l'intero programma viene listato 

LIST 150 K&l 

la linea 150 viene listata 

LIST . BJ 

la linea attuale viene listata 

LIST 200-EH 

vengono listate la linea 200 e tutte le suc¬ 
cessive 

LIST -1000 I4J 

vengono listate tutte le linee dall'inizio 
alla linea 1000 

LIST 100-190 BJ 

vengono listate tutte le linee dalla linea 
100 alla 190 

LIST .-500 B3 

vengono listate tutte le linee dalla linea 
attuale alla 500 


Per Interrompere una Lista 


SE... 


ALLORA... 

l'utente imposta 


la lista del programma viene sospesa, senza 
che il sistema entri in Stato Comandi. 

HtM Q 


L'utente può continuare la lista premendo 
un qualsiasi tasto 

l'utente imposta: 


l'M20 entra in Stato Comandi interrompendo 
definitivamente la lista 

U 



l'intero programma è 
stato listato 


l'M20 entra in Stato Comandi 

























FILE PROGRAMMA E FILE DATI 


Un file è una sequenza di istruzioni (file programma) o di dati (file 
dati), sequenza che può essere memorizzata su disco. 

La seguente tabella sintetizza le caratteristiche principali di un file 
programma e di un file dati. 


TIPO DI FILE 

SIGNIFICATO 

file programma 

un file programma è una sequenza di linee di 
programma. Queste vengono memorizzate se¬ 
condo la successione crescente dei numeri di 
linea, indipendentemente dall'ordine in cui 
sono state impostate. Un file programma 
viene memorizzato in un formato binario 
"compatto" e registrato su disco o in questo 
formato o in un formato "sorgente" ASCII (se 
l'utente usa l'opzione A per registrarlo). 1 
file in formato ASCII sono sequenze di 
caratteri ASCII e rappresentano effetti¬ 
vamente la sequenza di caratteri che appare 
su video quando l’utente lista il programma. 
Quando un programma viene trasferito da 
disco a memoria (tramite un comando LOAD o 
RUN), esso viene sempre convertito in 
formato "compatto". 

file dati 

un file dati è una sequenza di dati numerici 
e/o stringa registrata su disco. 

Un file dati viene creato tramite un 
programma BASIC. Per prima cosa,deve essere 
aperto tramite una istruzione OPEN che ne 
specifichi il nome, il metodo d'accesso e 
associ al file un numero da 1 a 15. 

Ogni successiva istruzione di Input/Output 
nel programma farà riferimento al file 
tramite questo numero. 

Quando il programma non deve più leggere o 
registrare dati sul file è buona norma di 
programmazione "chiuderlo" tramite una i- 
struzione CLOSE. In ogni caso tutti i file 
dati vengono chiusi quando il programma 
termina con una istruzione END. 
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Nota: Chiudere un file dati significa 

impedirne l'accesso da programma. Il pro¬ 
gramma, per poter accedere di nuovo a quel 
file deve riaprirlo tramite un'altra istru¬ 
zione OPEN associandovi un nuovo (o lo 
stesso) metodo a'accesso e un nuovo (o lo 
stesso) numero di file. Soltanto il nome 
dovrà essere lo stesso. 


IDENT IFICATORI DI FILE E DI VOLUME 

Un disco può contenere uno o più file programmi e/o file dati. Un singolo 
file non può essere registrato parte su un disco e parte su un altro. 

L'insieme di file registrati su un unico disco è denominato "volume". 

Ogni file e ogni volume hanno un proprio identificatore. Non è possibile 
avere due file con lo stesso nome su uno stesso volume. Se si registra un 
file programma su un disco dove esiste già un file con lo stesso nome, il 
nuovo file sostituisce il precedente. 

Si può assegnare un identificatore ad un file sia tramite l'istruzione 
OPEN (file dati), sia tramite il comando SAVE (file programma) e sia 
tramite il comando FNEW del PCOS. 

Si può assegnare un identificatore a un volume o con il comando VFORMAT o 
con il comando VNEW o con il comando VRENAME del PCOS. 

Il sistema riconosce un identificatore di volume e può accedere a uno dei 
suoi file soltanto se il dischetto corrispondente è stato inserito in una 
delle due unità disco. Questa limitazione non vale per l'hard disk, dato 
che questa unità è sempre in linea. 
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volume identifier 



y©—. 

-Gh 



Figura 2-7 Identificatore di File e di Volume 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


volume name 
(nome di volume) 


stringa di (al massimo 14) caratteri stampabili 
ASCII (alcuni caratteri non sono ammessi, 
vedere Caratteri Illegali in questo paragrafo). 


Per selezionare un volume in un comando PCOS o 
BASIC o in una istruzione OPEN, l'utente deve 
specificare un nome di volume oppure un numero 
di unità disco. 
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INTRODUZIONE. LISTING ED ESECUZIONE DI UN PROGRAMMA 


Il nome di volume (come pure il numero di unità 
disco) può essere seguito da una password di 
volume. Alla fine di un identificatore di 
volume, l'utente deve impostare il carattere 
due punti (:). 

Per esempio: 

SAVE "VOLI :F1LE1" PC 

Qui VOLI è un nome di volume; FILE1 è un nome 
di file e l'intera stringa VOLI :F1LE1 è un 
identificatore di file. Tramite questo comando 
l'utente registra il file programma FILE1 sul 
disco che ha nome VOLI. (Per ulteriori dettagli 
vedere il comando SAVE in questo capitolo). 

Nota : Quando l'utente specifica un identifica¬ 
tore di file o di volume in una istruzione o in 
un comando BASIC, deve racchiudere l'identifi¬ 
catore tra virgolette ("), oppure scrivere una 
variabile stringa, o una espressione stringa il 
•cui valore è l'identificatore. 

Quando specifica un identificatore di file o di 
volume in un comando PCOS, non deve racchiudere 
l'identificatore tra virgolette. 

Per esempio: 

vn VOLI : P:1 

Si noti inoltre che tutti i comandi e le 
istruzioni BASIC possono solo specificare un 
identificatore di volume come facente parte di 
un identificatore di file. Fa eccezione il solo 
comando F1LES, quando viene utilizzato per 
visualizzare l'elenco di tutti i file di un 
volume. 

Per esempio: 

FILES "V0L2:" IO 
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drive number (numero 
unità disco) 

il drive number può essere 0 (che indica 
l'unità, alla destra), oppure 1 (che indica 
l'unità alla sinistra), oppure 10 (che indica 
l'hard disk). In un sistema hard disk il drive 

0 è a sinistra e il drive 1 non esiste. 

Per esempio: 

LOAD "1 :F1LE002" B1 

Qui 1: indica che il file F1LE002 risiede sul 
dischetto inserito nella unità 1. 11 comando 
trasferisce il programma da disco a memoria 
(per ulteriori dettagli vedere il comando LOAD 
in questo capitolo) 

file password 

stringa di (al massimo) 14 caratteri stampabili 
ASCII. Alcuni caratteri sono esclusi (vedere 

OPPURE 

Caratteri Illegali in questo paragrafo). 

volume password 

Una password permette di proteggere un volume o 
un file limitandone l'accesso a chi conosca la 
password. Una password può essere impostata 
dopo un nome di volume, o un numero di unità 
disco, o un nome di file e deve essere 
preceduta da una barra (/). 

Per esempio: 

RUN "0 :RETTANG0L01/RI" 

Con questo comando l'utente trasferisce da 
disco a memoria il programma RETTANG0L01 che ha 
la password RI e ne lancia l'esecuzione . 
RETTANC0L01 è registrato sul dischetto inserito 
nell'unità 0. (Per ulteriori dettagli vedere il 
comando RUN in questo capitolo) 

file name 
(nome di file) 

stringa di (al massimo) 14 caratteri stampabili 
ASCII. Alcuni caratteri sono esclusi (vedere 
Caratteri Illegali in questo paragrafo). 

Per selezionare un file in un comando PCOS o 
BASIC o in una istruzione OPEN l'utente deve 
specificare un nome di file. Esso può essere 
preceduto da un identificatore di volume e 

► 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 


seguito da una estensione (extension) e/o da 
una password. 

Per esempio: 

SAVE "1 :PRIMENUMBERS/PN" E1 

Tramite questo comando l'utente registra il 
file programma PRIMENUMBERS sul dischetto 
inserito nella unità 1 e dà al file la password 
PN. 


Nota: Se l'utente non specifica un identifica¬ 
tore di volume prima del nome di file, il 
sistema seleziona l'unità selezionata per 
ultima oppure l’unità 0 se nessuna unità era 
stata, in precedenza, selezionata per ultima. 

Nota : 11 nome di file può includere un'esten¬ 
sione, cioè una stringa di (al massimo) 12 
caratteri stampabili ASCII, preceduta da un 
punto decimale (.). Alcuni caratteri sono 
esclusi (vedere Caratteri Illegali in questo 
paragrafo). 

Nota : filename.extension non può superare 14 
caratteri in totale (compreso il punto) 

Per esempio: 

LOAD "F1LEA.CHAR" EH 

trasferisce il programma FILEA che ha l'esten¬ 
sione CHAR da disco in memoria. Esso risiede 
sull'ultima unità selezionata. 

Nota : Alcune estensioni hanno un significato 
particolare: BAS (programmi BASIC); CMD (Coman¬ 
di PC05 transienti); SAV (Comandi PCOS tran¬ 
senti, che divengono residenti la prima volta 
che vengono eseguiti). Per ulteriori dettagli 
vedere il "Professional Computer Operating 
System (PCOS) Guida Utente". 
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Caratteri Illegali 


asterisco 

(*> 

barra rovescia (\) 

due punti 

(:) 

più 

<+> 

segno di numero (#) 

punto interrogativo 

(?) 

trattino 

(-) 

uguale (=) 

virgolette 

(") 

barra 

(/) 

virgola (,) 

apice 

C) 

spazio 





oppure un 

qualsiasi carattere di controllo 




PASSWORD 

L'utente può proteggere un volume o un file tramite una password (parola 
d'ordine). 

Una password può essere usata per abilitare un volume: un volume è abi¬ 
litato se non ha password oppure se l'utente ha specificato questa 
password in un comando BASIC o PCOS. 

L'utente deve specificare la password in modo corretto tutte le volte che 
nomina un volume o un file ai quali è stata assegnata una password. 

Nota : Né il, BASIC né il PCOS consentono di venire a conoscere una 
password nell'eventualità che l'utente l'abbia dimenticata. 
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PASSWORD DI VOLUME 


SE l'utente vuole... 

ALLORA... 

assegnare una password 
a un volume 

deve impostare il comando VPASS del PCOS 
specificando la password. 

Per esempio: 

vp MYVOL: ,MYPASS 

SE 

il volume ha già una password, questa deve 
esser specificata con il comando VPASS, che, in 
questo caso, cambierà la password. 

Per esempio: 

vp VOLI /OLDPASS :, NEWPASS Eli 

accedere a un volume 
che ha una password 
(o a un suo file) 

deve abilitare quel volume, specificandone la 
password dopo il nome di volume o dopo il 
numero dell'unità disco, in un comando BASIC o 
PCOS oppure in una istruzione OPEN. 

Nota: Una volta che una password di un 
dischetto é stata specificata, non é più 
necessario specificarla un'altra volta finché 
il dischetto non venga rimosso e un'altro 
dischetto venga selezionato sulla stessa unità. 

Per l'hard disk, una volta che la password è 
stata specificata, non è più necessario speci¬ 
ficarla un'altra volta finché il PCOS non venga 
reinizializzato. 

rimuovere una password 
da un volume 

deve impostare il comando VDEPASS del PCOS 

Nota: L'utente deve conoscere la password per 
poter usare il comando VDEPASS. 

impedire la visualizza¬ 
zione di una password 
di volume 

deve impostare H. 11 cursore cambia 

forma e frequenza di lampeggio e i caratteri 
impostati successivamente non vengono visua¬ 
lizzati (Hide State). 

Per ritornare a visualizzare i caratteri 
impostati (Display State), l'utente deve impo¬ 
stare di nuovo Bri oppure 










PASSWORD DI FILE 


SE l'utente vuole .... 

ALLORA .... 

assegnare una password 
a un file 

deve impostare il comando FPASS del PCOS 
specificando la password. 

SE 

il file ha già una password, questa deve 
essere specificata con il comando FPASS 
che, in questo caso, cambierà la password. 

assegnare una password 
a un file programma 
(che ne é sprovvisto) 

può impostare il comando FPASS del PCOS 
oppure il comando SAVE del BASIC specificando¬ 
ne la password: 

Per esempio: 

SAVE "FILE ABC/PASS ABC E#' 

accedere a un file che 
ha una password 

deve specificare la password dopo il nome 
del file. 

Per esempio: 

LOAD "F1LEZ/PASSZ1 " 

Se anche il volume ha una password, l'utente 
deve specificarla (a meno che il volume 
sia già stato abilitato) 

rimuovere una password 
da un file 

deve impostare il comando FDEPASS del PCOS 

Nota : L'utente deve conoscere la password 
del file per poterla rimuovere o cambiare 

impedire la visualizza 
zione di una password 
di file 

deve impostare 1003^1 KH- 11 cursore 
cambia forma e frequenza di lampeggio e 
i caratteri impostati non vengono visualizzati 
(Hide State). 


Per ritornare a visualizzare i caratteri 
impostati, l'utente deve premere di nuovo 
WtiW IH oppure . 
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PROTEZIONE DA SCRITTURA 

L'utente può proteggere da scrittura sia un intero dischetto che un 
singolo file. 


SE l'utente vuole ... 


ALLORA ... 

proteggere da scrit¬ 
tura un volume (cioè 
evitare qualsiasi o- 
perazione di scrit¬ 
tura su quel dischetto) 


deve proteggere l'apposito intaglio con una 
etichetta metallizzata. 

Nota: Non è possibile proteqqere da scrittura 
l'hard disk, ma solo i file residenti su di 
esso. 

togliere la protezio¬ 
ne da scrittura a un 
dischetto 


deve togliere l'etichetta metallizzata 

proteggere da scrit¬ 
tura un file 


deve impostare il comando FWPROT del PCOS, 
specificando l'identificatore di file. 

togliere la prote - 
zione da scrittura 
a un file 


deve impostare il comando FUNPROT del PCOS, 
specificando l'identificatore di file 


REGISTRAZIONE DI UN PROGRAMMA 


Un programma resta in memoria finché la macchina é accesa. Appena si 
spegne la macchina, la memoria viene azzerata e si perde quindi il 
programma. Perciò se l'utente vuole conservare una copia del programma 
che ha appena introdotto in memoria da tastiera, deve impostare il 
comando SAVE (che registra il programma su disco). 

Può essere utile registrare il programma anche in altre occasioni che 
vengono indicate nella seguente tabella. In ognuno dei seguenti casi si 
suppone che il disco sia abilitato, altrimenti l'utente deve specificare 
la password di volume mediante il comando SAVE. Inoltre se si vuole 
registrare il programma su un dischetto, questo non deve ovviamente 
essere protetto da scrittura. 
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SE l'utente vuole... 

ALLORA... 

spegnere la macchina 

deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco) 

introdurre un altro 
programma da tastiera 

deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco) 

trasferire un altro 
programma da disco a 
memoria (tramite un 
comando LOAD o RUN) 

deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco). 

passare in PCOS (tra¬ 
mite il comando SYS¬ 
TEM) 

deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco). 

sostituire la ver¬ 
sione precedente del 
suo programma 

deve registrare il programma residente in 
memoria, specificando lo stesso nome della 
versione precedente 

E 

la stessa password (se la versione precedente 
aveva una password) 

registrare in formato 
ASCII il programma 
residente in memoria 

deve specificare l'opzione A nel comando SAVE 

proteggere il program¬ 
ma residente in memo¬ 
ria contro ogni ten¬ 
tativo di listarlo, 
modificarlo, o regi¬ 
strarlo di nuovo 

deve specificare l'opzione P nel comando SAVE 


Nota : Durante un'operazione di registrazione la luce rossa dell'unità 
disco si accende. Quando si spegne, il programma è registrato e il 
messaggio Ok appare su video. 


2-22 


LINGUAGGIO BASIC - MANUALE GENERALE 

















INTRODUZIONE. LISTING ED ESECUZIONE DI UN PROGRAMMA 


SAVE (PROGRAMMA/1MMEDIATO) 


Registra il programma residente in memoria su disco e gli assegna un 
nome ed eventualmente una password 



file 

Mi 


identifier 





Figura 2-8 Comando SAVE 

Dove 


ELEMENTO 01 SINTASSI 

SIGNIFICATO 

file identifier 

può essere sia una costante che una variabile 
stringa. Specifica il nome del programma da 
registrare su disco. Può includere una password 
di file e un identificatore di volume 

A 

specifica che il programma deve essere regi¬ 
strato su disco in formato ASCII 

P 

specifica che il programma deve essere regi¬ 
strato su disco protetto contro ogni tentativo 
di listarlo, modificarlo o registrarlo di nuovo 

Esempi 


In ognuno dei seguenti esempi si suppone che il disco sia abilitato e non 
sia protetto da scrittura. 
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SE l'utente imposta... 

ALLORA... 

SAVE "RETTANG0L01" Gli 

il programma RETTANGOLA viene registrato 
sul disco inserito nell'ultima unità 
selezionata. 

RETTANG0L01 non ha password 

SAVE "0: RETTANGOLA " I£I 

il programma RETTANG0L01 viene registrato 
sul dischetto inserito nella unità 0. 

RETTANGOLA non ha password 

SAVE "10:RETTANGOLA" I£J 

il programma RETTANGOLA viene registrato 
sull'hard disk. 

RETTANGOLA non ha password 

SAVE "VOLI:RETTANGOLA" G3 

il programma RETTANGOLO! viene registrato 
su VOLI, che può essere inserito in 
entrambe le unità (dato che l'utente ha 
specificato il nome del volume). 

RETTANG0L01 non ha password 

SAVE "VOLI: RI/PASS" ■£! 

RI viene registrato su VOLI, che può 
essere inserito in entrambe le unità e 
assegna la password PASS al file RI. 


Sostituzione di un file 

Si suppone, negli esempi che seguono, che il volume sia abilitato e non 
sia protetto da scritture. 


SE l'utente imposta... 

E SE... 

ALLORA... 

SAVE "FILE!" 

FILE1 esiste già 
sul disco sele¬ 
zionato 

E 

non ha password 

il programma residente 
in memoria sostituirà la 
versione precedente con 
lo stesso nome. 
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SAVE "F1LE1/PASS1" 


FILEI esiste già 
sul disco sele¬ 
zionato 

E 

ha password PASSI 


il programma residente 
in memoria sostituirà la 
versione precedente con 
lo stesso nome e la 
stessa password 



FILEI esiste già 
sul disco sele¬ 
zionato 

E 

ha una password 
differente 


non avviene sostituzio¬ 
ne, e il sistema emette 
un messaggio d'errore 
(vedere Appendice C) 



FILEI esiste già 
sul disco sele¬ 
zionato 

E 

non ha password 


il programma residente 
in memoria sostituirà la 
versione precedente con 
lo stesso nome, e l'at¬ 
tuale versione avrà la 
password PASSI 


Opzione A 

Se l'utente specifica l'opzione A, il file viene registrato in formato 
ASCII. 

Se egli, invece, non specifica l'opzione A (cioè nessuna opzione o 
l'opzione P), il file viene registrato in formato binario "compatto". 

11 formato ASCII occupa più spazio su disco che il formato "compatto", ma 
alcuni comandi richiedono che i file siano in formato ASCII, come ad 
esempio il comando MERGE. 


SE l'utente imposta... 


ALLORA... 


SA VE "GEOMETRY",A Bi 


il programma GEOMETRY viene registrato in 
formato ASCII (cioè in una sequenza di 
caratteri ASCII) sul disco inserito nel¬ 
l'ultima unità selezionata 


GEOMETRY non ha password. 


Si suppone che il disco sia abilitato. 



















Opzione P 


Se l'utente specifica l'opzione P, il file non è soltanto registrato in 
formato binario "compatto", ma anche "protetto" contro ogni tentativo di: 

- listarlo 

- modificarlo 

- registrarlo di nuovo 

Mota : L'utente non può rimuovere la protezione P. 


SE l'utente imposta... 


ALLORA... 


SAVE "0:GEODESY",P HI 


GEODESY viene registrato in formato bina¬ 
rio "compatto" e "protetto" sul disco 
inserito nella unità 0. 


GEODESY non ha password. Si suppone che il 
disco sia abilitato. 


TRASFERIMENTO DA DISCO A MEMORIA 


Se il programma che l'utente vuole portare in memoria risiede su disco, 
l'utente deve impostare un comando LOAD. 

LOAD, nel trasferire un programma in memoria, ricopre qualsiasi altro 
programma ivi residente, perciò, prima di impostare un comando LOAD, 
l'utente dovrà provvedere a registrare su disco il programma attuale 
(supposto che non ne abbia già una copia). 

Per accedere a un programma su disco tramite un comando LOAD, il disco 
deve essere abilitato (altrimenti l'utente deve specificare la password). 
Per accedere ad un programma dotato di password, l'utente deve 
specificarne la password sempre tramite il comando LOAD. 

Se l'utente specifica l'opzione R tutti i file dati che erano stati 
aperti dal programma ricoperto rimangono aperti, inoltre il nuovo 
programma non solo viene trasferito in memoria ma viene anche eseguito 
(senza che l'utente debba impostare RUN). 
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INTRODUZIONE. LISTING ED ESECUZIONE DI UN PROGRAMMA 


LOAO (PROGRAMMA/IMMEDIATO) 


Trasferisce un programma da disco in memoria e ne lancia l'esecuzione (se 
l’utente specifica l'opzione R). 


file 

J 

identifier 





Figura 2-9 Comando LOAD 

Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file identifier 

può essere sia una costante che una variabile 
stringa; specifica il file programma, che deve 
essere trasferito in memoria da disco 

R 

specifica che tutti i file dati aperti dal 
programma precedente vengano lasciati aperti e 
che il nuovo programma, dopo essere stato 
trasferito da disco in memoria, venga anche 
eseguito 

Esempi 



SE l'utente imposta... 


ALLORA... 

LOAD "10:RETTANGOLO!" Eli 

il programma RETTANG0L01 viene tra¬ 
sferito in memoria dall'hard disk. 

Si suppone che RETTANG0L01 non abbia 
password e che il disco sia abilitato 
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LOAD "VOLI :RETTANG0L01/P1" 


il programma RETTANG0L01 viene tra¬ 
sferito da disco a memoria. 

RETTANG0L01 ha come password PI e 
risiede sul disco VOLI che può essere 
inserito sia nella prima che nella 
seconda unità. 

Si suppone che VOLI sia abilitato. 

LOAD "V3/P3:FAA" |&1 


il programma FAA viene trasferito da 
disco a memoria. FAA risiede sul 
disco V3 che ha la password P3. 11 
disco V3 può essere inserito sia 
nella prima che nella seconda unità. 

11 comando LOAD, in questo caso, 
abilita anche il disco V3, dato che 
ne specifica la password. 

Si suppone che FAA non abbia pass¬ 
word. 

LOAD B$ Mita 


il programma, individuato dal conte¬ 
nuto della variabile B$, viene tra¬ 
sferito in memoria. 


Opzione R 

Se l'utente specifica l'opzione R, tutti i file dati che erano stati 
aperti dal programma precedentemente eseguito restano aperti e viene 
anche lanciata l'esecuzione del nuovo programma trasferito da disco in 
memoria (senza che l'utente debba impostare il comando RUN). 

Se l'utente non specifica l'opzione R, il comando LOAD chiude tutti i 
file dati che erano stati aperti dal programma precedentemente eseguito. 

Si noti che: 

LOAD file identifier, R 

e RUN file identifier, R H:l 

sono comandi equivalenti 
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SE l'utente imposta... 


ALLORA... 


LOAD "ACCOUNT",R «:■ 


il programma ACCOUNT viene trasferito in 
memoria da disco e viene eseguito; tutti i 
file che erano stati aperti dal programma 
precedente restano aperti. ACCOUNT risiede 
sull'unità selezionata per ultima. 


ACCOUNT non ha password e il disco su cui 
risiede deve essere abilitato. 


ESECUZIONE DI UN PROGRAMMA 


Una volta che un programma è in memoria può essere eseguito. Per dire al 
sistema M20 di eseguire un programma, si deve impostare un comando RUN, 
(oppure un comando LOAD con l'opzione R). 

11 comando RUN esegue tutte le operazioni richieste dal, programma 
residente in memoria, o trasferisce un programma da disco e poi le 
esegue. Quando il comando RUN specifica il nome di un file programma, può 
includere: 

- una password di file, se il file ha una password 

- una password di volume, se il volume ha una password (e non è stato 
ancora abilitato) 

Se l'utente specifica l'opzione R, tutti i file dati che erano stati 
aperti dal programma precedente, restano aperti. 

Prima di impostare RUN file-identifier (oppure RUN file-identifier,R), 
l'utente deve registrare su disco il programma residente in memoria 
(ammesso che non ne abbia già una copia). 

Le istruzioni BASIC vengono eseguite seguendo la sequenza del numero di 
linea, a meno che un'istruzione di controllo (GOTO, ON...GOTO, 1F... 
GOTO...ELSE, IF...THEN...ELSE, FOR/NEXT, WH1LE/WEND) o il richiamo di un 
sottoprogramma (GOSUB, 0N...G0SUB), specifichi altrimenti. 










RUN (PROGRAMMA/IMMEDIATO) 


Lancia l'esecuzione del programma residente in memoria. Se il comando RUN 
specifica il nome di un programma su disco, questo viene trasferito in 
memoria ed eseguito. 



Figura 2-10 Comando RUN 

Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

line number 

specifica il numero di linea da dove inizia 
l'esecuzione del programma. Se l'utente non 
specifica questo numero il programma viene 
eseguito a partire dalla prima istruzione 

Nota: RUN line number e GOTO line number 
hanno la stessa funzione salvo il fatto che 
RUN ha anche la funzione di azzerare le 
variabili (cioè porre a zero le variabili 
numeriche e assegnare la stringa nulla alle 
variabili stringa) 

file identifier 

può essere sia una costante che una variabi¬ 
le stringa; specifica il file programma che 
deve essere trasferito in memoria da disco 
ed eseguito 

R 

questa opzione specifica che tutti i file 
dati aperti dal programma precedente esegui¬ 
to devono restare aperti. Se l'opzione non è 
specificata tutti i file dati vengono 
automaticamente chiusi prima di iniziare 
l'esecuzione del nuovo programma 
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Esempi 

Negli esempi seguenti si suppone che il disco selezionato sia abilitato 


SE l'utente imposta... 

ALLORA... 

RUN 

il programma residente in memoria viene 
eseguito 

RUN 150 K:1 

il programma residente in memoria viene 
eseguito a partire dalla istruzione 150 

RUN "1 :Newfile” K1 

il programma Newfile viene trasferito da 
disco in memoria ed eseguito. Il pro¬ 
gramma risiede sul dischetto inserito 
nella unità 1. 

Si suppone che Newfile non abbia pass¬ 
word 

RUN "NewVOL:Newfile" H:1 

il programma Newfile viene trasferito da 
disco a memoria ed eseguito. Newfile 
risiede sul disco NewVOL che può essere 
inserito nella prima o nella seconda 
unità. 

Si suppone che Newfile non abbia pass¬ 
word 

RUN "1 :Newfile/NewPASS" Gii 

il programma Newfile viene trasferito da 
disco a memoria ed eseguito. Il program¬ 
ma ha la password NewPASS e risiede sul 
dischetto inserito nella unità 1. 

RUN A $ lil 

Il programma specificato tramite il 
contenuto della variabile A$ viene 
trasferito da disco in memoria ed 
eseguito 
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Opzione R 


Se l'utente specifica l'opzione R nel comando RUN, tutti i file dati 
aperti dal programma eseguito in precedenza restano aperti. 

Se l'utente non specifica l'opzione R, tutti i file dati vengono chiusi 
prima di lanciare l'esecuzione del nuovo programma. 

Si noti che: 

RUN file identifier, R 

e 

LOAD file identifier, R Wil 
sono comandi equivalenti 


Se l'utente imposta... 


ALLORA... 


RUN "10:Newfile",R 


il programma Newfile viene trasferito da hard 
disk in memoria ed eseguito. 1 file dati aperti 
dal programma eseguito in precedenza restano 
aperti. 


Si suppone che Newfile non abbia password e che 
l'hard disk sia abilitato. 
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Interruzione dell'Esecuzione 


SE ... 

ALLORA .... 

l'utente imposta MìilM 

si ha una interruzione del program¬ 
ma, viene emesso il messaggio'Break 

OPPURE 

in line nnnnn" e l'M20 entra in 
Stato Comandi. 

viene eseguita una 
istruzione STOP 

Nessun file dati viene chiuso. 
L'utente può visualizzare i valori 
delle variabili (tramite l'istru¬ 
zione immediata PR1NT) o modificare 
i valori (tramite l'istruzione 
immediata LET) 

L'utente può riprendere l'esecuzio¬ 
ne impostando il comando CONT (a 
condizione che nessuna istruzione 
sia stata modificata). 

viene riscontrato un 
errore (ad esclusione 
di un errore sintattico) 

Si ha una interruzione del program¬ 
ma e l'M20 entra in Stato Comandi. 
Nessun file dati viene chiuso. 
L'utente può visualizzare i valori 
delle variabili, ma non può ripren¬ 
dere l'esecuzione. 

viene riscontrato un 
errore sintattico 

si ha una interruzione del program¬ 
ma, viene emesso il messaggio 
d'errore e l'M20 entra in Stato 
Editor di linea, alla linea che ha 
causato l'errore. 

L'utente può modificare la linea 
con i comandi dell'Editor, ma non 
può visualizzare le variabili (a 
meno che non entri in Stato Comandi 
premendo Mi. L'esecuzione non può 
essere ripresa. 
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viene eseguita 
una istruzione END 

si ha una interruzione del program¬ 
ma e l'M20 entra in Stato Comandi. 
Tutti i file dati vengono chiusi. 


L'utente può visualizzare i valori 
delle variabili (tramite l'istru¬ 
zione immediata PR1NT), ma non può 
riprendere l'esecuzione. 


Arresto dell'Output su Video 


SE ... 

ALLORA ... 

l'utente imposta 

HCiW MI 

L'output su video viene arrestato. 

L'utente può far riprendere l'out¬ 
put su video premendo un tasto 
qualsiasi. 


1 file dati non vengono chiusi. 
L’utente non può visualizzare i 
valori delle variabili. 
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3. AGGIORNAMENTO E MODIFICA DI UN 
PROGRAMMA 





SOMMARIO 


Anche un buon programmatore ha spesso necessità di correggere e modifica¬ 
re i propri programmi. Un programma può essere modificato in vari modi: 
cancellando linee, sostituendo linee, inserendo linee, rinumerando le 
linee, modificando parti di linea con l'Editor. 

Questo capitolo illustra tutte queste possibilità facendo uso del 
programma RETTANG0L01. Verrà inoltre spiegato come rinominare un file, 
come cancellarlo su disco, come fare il MERGE di due programmi, come 
listare i nomi dei file di un disco. Si tenga presente che qualunque 
modifica a un programma, chiude tutti i file dati eventualmente ancora 
aperti, azzera le variabili numeriche e inizializza le variabili stringa 
col valore stringa nulla. 
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AGGIORNAMENTO E MODIFICA DI UN PROGRAMMA 


COME CANCELLARE LE LINEE 

A scopo dimostrativo useremo il programma RETTANG0L01 già utilizzato nel 
capitolo 2. 

Se il programma RETTANGOLOI risiede in memoria, l'utente deve per prima 
cosa impostare il comando LIST. 


VIDEO 

COMMENTI 

LIST 

RETTANGOLOI ha due istruzioni 

10 REM RETTANGOLOI 

di Input per introdurre da 

20 INPUT "Base";B 

tastiera i valori di B e H. 

30 1F B< =0 THEN 20 

Conviene moficare il program- 

40 INPUT "Altezza";H 

ma in modo da avere una sola 

50 1F H < =0 THEN 40 

istruzione di Input. Per 

60 LET AREA=B*H 

prima cosa cancelliamo l'i- 

70 PR1NT "Area=";AREA;" B=";B;" H=";H 

struzione 40. 

80 GOTO 20 


90 END 


Ok 



Se l'utente vuole cancellare la linea 40, deve impostare: 

OQIDBIIB K-mm UUUI 

oppure 


DOGI 


Per vedere il risultato di questo comando, l'utente deve impostare un 
altro comando LIST. 










VIDEO 


LIST 

10 REM RETTANGOLOI 
20 INPUT "Base";B 
30 IF B< =0 THEN 20 
50 IF H< =0 THEN 40 
60 LET AREA=A*H 

70 PR1NT "Area=";AREA;" B=";B;" 
80 GOTO 20 
90 END 
OK 


COMMENTI 


H=" 


In questa versione RETTANGOLOI 
non può essere eseguito. L'u¬ 
tente deve correggere sia 
l'istruzione 20 (che richiede 
di introdurre un solo valore), 
che l'istruzione 50 (che fa 
H riferimento a un numero di 
linea che non esiste più). 
Correggeremo il nostro pro¬ 
gramma nelle pagine successi¬ 
ve. 


DELETE (IMMEDIATO) 

Cancella le linee di programma. L'M20 ritorna in Stato Comandi dopo che è 
stato eseguito un comando DELETE. 



Figura 3-1 Comando DELETE 
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Esempi 


SE l'utente imposta... 

ALLORA... 

DELETE . Iti 

la linea attuale viene cancellata 

500 EH 

OPPURE 

DELETE 500 EH 

la linea 500 viene cancellata 

DELETE 100-200 EH 

tutte le linee tra la 100 e la 200 comprese 
vengono cancellate 

DELETE -400 EH 

tutte le linee dall'inizio del programma fino 
alla linea 400 compresa vengono cancellate. 


Nota: Se l'utente specifica con il comando DELETE dei numeri di linea che 
non esistono nel programma residente in memoria, il BASIC emette il 
messaggio "lllegal function cali". 


SOSTITUZIONE DI LINEE 


Per modificare una linea l'utente può: 

- sostituire l'intera linea, impostando il numero di linea e il suo nuovo 
contenuto, oppure 

- modificare una parte di linea utilizzando 1'Editor di linea. 

Dapprima usiamo il primo metodo e sostituiamo la linea 20 e la linea 50 
del programma RETTANG0L01, impostando: 

20 INPUT "Base e Altezza";B,H Hil 
50 1F He =0 THEN 20 «il 

e il programma sarà così listato: 


3-3 













VIDEO 


COMMENTI 

LIST 


Questa versione di 

10 REM RETTANGOLA 


RETTANGOLA è corretta. 

20 INPUT "Base e Altezza";B,H 


Comunque per terminare 

30 1F B <=0 THEN 20 


l'esecuzione, l'utente 

50 1F H<=0 THEN 20 


dovrà ancora impostare: 

60 LET AREA=B*H 

70 PRINT "Area=";AREA;" B=";B;" H=";H 

80 GOTO 20 

90 END 

Ok 


U 


Però non è pratico dover impostare alla fine dell'esecuzione 

del programma, pertanto faremo alcune ulteriori modifiche. Possiamo 
sostituire alla linea 80, le seguenti due linee: 

1) INPUT "Ancora:SI=S,N0=N";X$ 

2) 1F X$="S" THEN 20 

Per sostituire l'istruzione GOTO alla linea 80, l'utente deve impostare: 
80 INPUT "Ancora:S1=S,N0=N";X$ H:1 
Nota : X$ è una variabile stringa. 


INSERIMENTO DI LINEE 

Ora dobbiamo inserire l'istruzione 2) fra la linea 80 e la linea 90. 
Possiamo scegliere 85 come numero di linea e impostare: 

85 IF X$= "S" THEN 20 

Ora impostiamo un altro comando LIST: 
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VIDEO 


COMMENTI 

LIST 


Questa versione di 

10 REM RETTANGOLOI 


RETTANGOLOI non richie- 

20 INPUT "Base e Altezza";B,H 


de che l'utente imposti 

30 1F B< =0 THEN 20 


BW H9 per arre- 

50 1F H<=0 THEN 20 


starne l'esecuzione. 

60 LET AREA=B*H 


Però la sequenza dei 

70 PR1NT "Area=";AREA;" 8=";B;" H=";H 


numeri di linea non ha 

80 INPUT "Ancora:S1=S,N0=N";X$ 


più un intervallo di 

85 1F X$="S" THEN 20 


10. 

90 END 



Ok 




Quando l'utente lancia l'esecuzione del programma, ecco cosa succede: 
dopo aver calcolato l'area del rettangolo corrispondente ai valori 
introdotti della base e dell'altezza, il programma chiede all'utente se 
vuole continuare a introdurre altri valori. In caso affermativo, l'utente 
premerà S. L'istruzione 85 riporta allora il controllo all'istruzione 20 
e si ripete la sequenza di calcolo. In caso negativo, l'utente premerà N. 
L’istruzione 85 non riporta in tal caso il controllo all'istruzione 20, 
ma viene eseguita l'istruzione successiva che è un'istruzione END che 
arresta l'esecuzione del programma. 


COME R1NUMERARE LE LINEE 



Come abbiamo visto, l'attuale numerazione delle linee di RETTANGOLOI non 
ha più un intervallo di 10. Ciò non ha importanza quando il programma è 
semplice, ma quando il programma è complesso e suscettibile di ulteriori 
modifiche, una numerazione delle linee casuale è sempre sconsigliabile. 

Il comando RENUM consente di rinumerare le linee di un programma, 
iniziando ad esempio con 10 e con un intervallo di 10 tra le linee. 
L'utente deve solo impostare: 

IIHOlllil I&a 

Per vedere il risultato, l'utente deve impostare un altro comando LIST. 
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LIST 

10 REM RETTANG0L01 

20 INPUT "Base e Altezza"; B,H 

30 1F B< =0 THEN 20 

40 IF H<=0 THEN 20 

50 LET AREA=B*H 

60 PR1NT "Area=";AREA;" 3=";B;" H=";H 
70 INPUT "Ancora;SI=S,NO=N";X$ 

80 1F X$="S" THEN 20 
90 END 
Ok 


MODIFICA AUTOMATICA DEI NUMERI DI LINEA RIFERITI 

Quando un programma viene rinumerato tramite il comando RENUM, tutti i 
numeri di linea riferiti all'interno del programma vengono aggiornati in 
modo automatico. Per es. t se un programma contiene l’istruzione GOTO 140 
e la linea 140 viene rinumerata, il riferimento a questa linea 
nell'istruzione GOTO sarà aggiornato in modo automatico. 


Regola Generale 

11 comando RENUM modifica tutti i numeri di linea riferiti dopo GOTO, 
GOSUB, THEN, ELSE, 0N...G0T0, 0N...G0SUB e ERL, correntemente alla nuova 
numerazione delle linee. 

Se in un programma si fa riferimento a linee non esistenti, il comando 
Renum fa comparire il messaggio seguente: 

Undefined line XXXXX in YYYYY. 

11 programma sarà rinumerato correttamente e i riferimenti a linee non 
esistenti rimarranno immutati. 


RENUM (IMMEDIATO) 

Modifica i numeri di linea del programma residente in memoria. 
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Figura 3-2 Comando RENUM 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 


VALORI DI DEFAULT 

new line number 

è il primo numero 
di linea della nuo¬ 
va numerazione 


10 

old line number 

è il primo numero 
di linea della pre¬ 
cedente numerazione 


se omesso corrispon¬ 
de alla prima linea 
del programma 

interval 

è il nuovo interval¬ 
lo tra i numeri 
di linea 


10 


Esempi 


SE l'utente imposta... 


ALLORA... 

RENUM «il 


l'intero programma viene rinumerato. Il primo 
numero di linea nella new line number è 10 e 
viene assunto un intervallo di 10 (valori di 
default) 

RENUM 100 IO 


L'intero programma viene rinumerato. 11 primo 
numero di linea è 100 e viene assunto un 



intervallo di 10 (valore di default). 




































RENUM 150, ,20 li! 


L’intero programma viene rinumerato. Il primo 
numero di linea è 150 e viene assunto un 
intervallo di 20 


MODIFICA DI LINEE CON L'EDITOR DI LINEA 

In Stato Editor è possibile modificare parti di una linea, senza dover 
riscrivere l'intera linea. 

L'M20 entra in Stato Editor di linea se: 

- l'utente imposta un comando ED1T, oppure 

- viene riscontrato un errore di sintassi. 

Dopo essere entrato in Stato Editor, l'M20 visualizza il numero della 
linea da modificare (che è seguito da uno spazio) e resta in attesa che 
l'utente imposti un comando dell‘Editor. Questi comandi non vengono 
visualizzati quando l'utente li introduce, infatti, in Stato Editor, 
l'M20 interpreta i caratteri introdotti di volta in volta che l’utente li 
imposta, senza aspettare che l'utente prema Bl . 


ED1T (IMMEDIATO) 

11 comando ED1T fa si che l'M20 entri in Stato Editor alla linea 
specificata. 



Figura 3-3 Comando ED1T 
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Esempi 

SE l'utente imposta... 

ALLORA l'M20 visualizza... 

E01T . ■£> 

nn...n (entrando in Stato Editor alla linea 
attuale) In questo caso nn...n indica il 
numero della linea attuale 

ED1T 300 IO 

300 (entrando in Stato Editor alla linea 

specificata (quindi alla 300)) 


COMANDI DELL'EDITOR 


La seguente tabella illustra i comandi dell'Editor che vengono raggrup¬ 
pati in classi. 


CLASSE 

COMANDO 

SIGNIFICATO 

inizio modifiche 

11 (Lista) 

visualizza lo stato 
attuale della linea. 
11 numero della li¬ 
nea attuale viene 
visualizzato al¬ 
l'inizio della linea 
successiva. 


1.1 (Again-Ancora) 

ripristina la linea 
originaria senza vi¬ 
sualizzarla. 11 nu¬ 
mero della linea at¬ 
tuale viene di nuovo 
visualizzato al¬ 
l’inizio della linea 
successiva. 

spostamento cursore 

n ima 

visualizza gli n ca¬ 
ratteri successivi e 
sposta il cursore a 
destra di una posi¬ 
zione. 
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WìilM 1!1 (Backspace) 

Cancella l'ultimo 
carattere della li¬ 
nea e sposta il 
cursore a sinistra 
di una posizione. 

inserimento caratteri 

Wi (Inserisce) 

entra in Stato Inse¬ 
rimento all'attuale 
posizione del curso¬ 
re. L’utente può 
inserire una stringa 
di caratteri e i 
caratteri inseriti 
vengono visualizza¬ 
ti. Per uscire dallo 
Stato Inserimento, 
l'utente deve impo¬ 
stare MtiW MIUliM 

m (Extended Line- 
Inserisce a fine 
linea) 

visualizza l'ultima 
parte della linea, 
sposta il cursore 
alla fine della li¬ 
nea e entra in Stato 
Inserimento 


esce dallo Stato 
Inserimento, ma ri¬ 
mane in Stato Edi¬ 
tor. Se l'utente 
preme ■£!, esce sia 
dallo Stato Inseri¬ 
mento che dallo Sta¬ 
to Editor 

Cancella 

caratteri 

B'M (Delete- 
Cancella un carattere) 

cancella il caratte¬ 
re successivo che 
viene visualizzato 
tra due barre rove¬ 
sce ( \ ) e il curso¬ 
re viene posizionato 
alla sua destra 
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BìE (Delete- 
Cancella n caratteri) 


cancella i succes¬ 
sivi caratteri. 1 
caratteri cancellati 
sono visualizzati 
tra due barre rove¬ 
sce ( \ ) ; il cursore 
viene posizionato 
alla destra del¬ 
l'ultimo carattere 
cancellato. 


ricerca caratteri 


Mil (Hack-Tronca) 


H gl (Search- 
Ricerca la prima 
occorrenza di x) 


Se la linea ha meno 
di n caratteri ella 
destra del cursore, 
lìl HOI cancella 
l'ultima parte della 
linea 


cancella l'ultima 
parte della linea e 
entra in Stato Inse¬ 
rimento 


ricerca la prima 
occorrenza di "x" 
nella linea (dove 
"x" è un qualsiasi 
carattere stampabile 
ASCII) e posiziona 
il cursore subito 
prima di questo ca¬ 
rattere. Il caratte¬ 
re alla posizione 
attuale del cursore 
non viene incluso 
nella ricerca. Se il 
carattere non viene 
trovato nella linea, 
il cursore viene 
portato a fine linea 
e tutti i caratteri 
esaminati durante la 
ricerca vengono vi¬ 
sualizzati. 












BìB B-B BÌB (Search- 
Ricerca l'n-esima 
occorrenza di x) 

ha la stessa funzio¬ 
ne del comando pre¬ 
cedente, ma ricerca 
l'n-esima occorrenza 
anziché la prima. 

BIB BÌB (Delete- 
Cancella fino alla 
prima occorrenza di x) 

ha una funzione si¬ 
mile al comando BìB 
Efl, ad esclusione 
del fatto che tutti 
i caratteri esamina¬ 
ci durante la ricer¬ 
ca vengono cancella¬ 
ti. 11 cursore viene 
posizionato subito 
prima di "x" e i 
caratteri cancellati 
vengono racchiusi 
tra due barre rove¬ 
sce ( \ ). 

m KB B*1 (Delete- 
Cancella fino al- 
l'n-esima occorrenza di 
x) 

ha la stessa funzio¬ 
ne del comando pre¬ 
cedente, ma ricerca 
l'n-esima occorren¬ 
za, anziché la pri¬ 
ma . 

sostituzione 

caratteri 

B»B BÌB (Cambia 
un carattere) 

cambia in "x" il 
carattere successivo 
a quello della posi¬ 
zione del cursore. 

noci 

B!fl ... BTiB 

(Cambia una stringa 
di n caratteri) 

cambia i successivi 
n caratteri nella 
stringa specificata 
(cioè impostata dopo 
B<B) . Quando l'uten¬ 
te ha impostato una 
stringa di n carat¬ 
teri, l'M20 ritorna 
in Stato Editor 
uscendo dallo Stato 
Sostituzione carat¬ 
teri. 

1 
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uscita dall’Editor 

K:1 


visualizza la linea 
modificata e ritorna 
allo Stato Comandi 


U (Exit-Uscita) 


ha la stessa funzio¬ 
ne di IE3H ma 
l'ultima parte della 
linea non viene vi¬ 
sualizzata. 


E1 (Quit-Uscita 
con ripristino) 


torna allo Stato 
Comandi e cancella 
tutti i cambiamenti 

fatti alla linea. 


Esempi 

La seguente tabella fornisce alcuni esempi di uso dei comandi dell'Edi¬ 
tor. 

Si noti che la posizione del cursore viene evidenziata come indicato (_) 


quando l'M20 é in stato Editor. 


SE l'utente imposta... 

ALLORA l'M20 visualizza... 

i lillllld EÌHJi 

Efl El EJ li* 

500 . 

2 Di 

500 FOR 1=1 TO 15 STEP 2 

500 . 

3 (6 volte) 

500 FOR 1=_ 

a 

a 

500 FOR 1=2. 

5 HJ.W1 (5 volte) 

500 FOR 1=2 TO 1_ 

6 U O 

500 FOR 1=2 TO 16_ 

7 li* 

500 FOR 1=2 TO 16 STEP 2 

1 

1 miuu 

QUEI Dii 

510 _ 































2 

u 

510 LET A(1)=1*SIN(X) 

510 . 

3 

Eilii (14 volte) 

510 LET A(l)=l*_ 

4 

HHHDH 

510 LET A(1)=1*C0S_ 

5 

Cfl H U U U U M 
UIIUH lì! 

510 LET A(1)=1*C0S(X):PRINT A(l) 

1 

1 

tflutiu Ez&a m k&i 

510 . 

2 

a o 

510 \LET \ _ 

3 

(11 volte) 

510 \LET \ A(1)=1*C0S( _ 

4 

U O n WiNW IIMIM 

510 \LET \ A(1)=1*C0S(Y+ . 

5 

KìUÌÌ (9 volte) 

510 \LET \ A(I)=1*C0S(Y+X):PR1NT _ 

6 

uuumintij 

510 \LET \ A(1)=I*C0S(Y+X): 

PRINT 1,X; 

1 

7 

u n u u «ara* m eh 

510 A(1)=1*C0S(Y+X):PR1NT 1,X; 

1 


ESAiE DEI VALORI ATTUALI DELLE VARIABI LI 

Quando l'utente modifica una linea di programma tramite l'Editor di 
linea, tutte le variabili numeriche vengono azzerate e le variabili 
stringa vengono inizializzate con il valore "stringa nulla" Inoltre 
vengono chiusi tutti i file dati. Se il BASIC rivela un errore sintattico 
durante l'esecuzione di un programma, passa automaticamente in Stato 
Editor. Prima di modificare una linea, l'utente potrebbe aver la 
necessità di sapere i valori attuali delle variabili. In questo caso 
dovrà premere il tasto M'1 . come primo comando di Editor. Questo comando 
fa passare dallo Stato Editor allo Stato Comandi, dove è possibile 
esaminare i valori delle variabili. Qualsiasi altro comando di Editor 
(premendo il tasto oppure B1 ecc.) azzererà tutte le variabili 
numeriche e inizializzerà tutte le variabili stringa con il valore 
"stringa nulla" (”"), rendendo perciò impossibile l'esame dei valori 
delle variabili. 
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COME RINOMINARE UN FILE 

L'utente può cambiare il nome di un file programma o di un file dati 
residenti su disco tramite il comando NAME, purché il disco o il file non 
siano protetti da scrittura. 11 volume selezionato deve includere il nome 
da sostituire, e non deve includere il nuovo nome del file. Dopo che un 
comando NAME è stato eseguito, il file continua a esistere sullo stesso 
disco e nella stessa area di disco, ma ha il nuovo nome. Le password di 
file e di volume (se esistevano), non vengono modificate. L'utente deve 
in tal caso specificare la password di file e il volume deve essere 
abilitato (altrimenti l'utente deve specificare anche la password di 
volume). 


NAME (PROGRAMMA/IMMEDIATO) 

Cambia il nome di un file su disco. 



Figura 3-4 Comando NAME 

Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file identifier 

Può essere una costante o una variabile stringa 
e specifica il file programma o dati il cui nome 
deve essere modificato 

file name 

Può essere una costante o una variabile stringa 
e specifica il nuovo nome del file 


Esempi 

Si suppone che nè il volume nè il file siano protetti da scrittura e che 
il volume sia abilitato. 
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SE l'utente imposta... 

ALLORA... 

NAME "1 :FR1" AS "FR2" 

EJ 

il nome di file FRI viene cambiato in FR2. 11 
file risiede sul dischetto inserito nella unità 
1. FRI non ha password. 

NAME "VOLI:ACC/PACC" 

AS "ACCI" ■£! 

11 nome di file ACC viene cambiato in ACCI. 11 
file risiede sul dischetto VOLI che può essere 
inserito sia nella prima che nella seconda 
unità. La password del file resta PACC. 


COME CANCELLARE UN FILE 

Tramite il comando KILL l'utente può facilmente cancellare i file 
programma oppure i file dati registrati su disco, purché il disco non sia 
protetto da scrittura. 11 nome di un file che è stato cancellato, può 
essere riutilizzato per identificare un nuovo file. 

L'utente deve specificare la password del file (se esiste), e il volume 
deve essere abilitato (altrimenti l'utente deve specificarne la 
password). 


KILL (PROGRAMMA/IMMEDIATO) 


Cancella un file programma o un file dati registrati su disco. 



file 



identifier 



Figura 3-5 Comando KILL 
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Dove 

File identifier può essere una costante o una variabile stringa e 
specifica il file da cancellare. 


Esempi 

Si suppone che il volume non sia protetto da scrittura e che sia 
abilitato. 


SE l'utente imposta... 

ALLORA... 

KILL "Business.B" HI 

il file Business.B viene cancellato. Esso 
risiede sull’unità selezionata per ultima. Il 
file non ha password. 

K1LL "1 : Business. B" 

il file Business.B viene cancellato. Esso 
risiede sul dischetto inserito nell'unità 1. 
11 file non ha password. 

KILL "NUMbers/PNUM01" B3 

il file NUMbers con password PNUM01 viene 
cancellato. Esso risiede sull'unità seleziona¬ 
ta per ultima. 


COME FARE IL MERGE DI DUE PROGRAMMI 

11 comando MERGE permette di inserire nel programma in memoria un altro 
programma residente su disco in formato ASCII, in modo da ottenere un 
unico programma. 11 comando MERGE ha una funzione simile al comando LOAD, 
ma il programma residente in memoria non viene cancellato al momento del 
trasferimento in memoria del programma su disco. L'operazione di MERGE 
comporta che le linee del programma su disco vengano inserite (secondo la 
sequenza del numero di linea) nel programma residente in memoria. Se, in 
questo processo di inserimento, due linee hanno lo stesso numero di 
linee, la linea del programma su disco sostituisce quella in memoria. 11 
comando MERGE deve specificare la password di file, se il programma su 
disco ha una password e il disco deve essere abilitato (o l'utente deve 
specificarne la password). 


3-17 















L'operazione di MERGE può ad esempio essere utile per inglobare subrou¬ 
tine standard in un programma. 

E' buona norma di programmazione fare l'operazione di MERGE tra un pro¬ 
gramma e subroutine con numeri di linea più alti del massimo numero di 
linee del programma al fine di ridurre il tempo dell’operazione di MERGE 
e di lasciare la possibilità di estendere, eventualmente, il programma. 


MERGE (PR0GRAMMA/1MMED1AT0) 


Esegue l'operazione di MERGE tra il programma in memoria e il programma 
registrato su disco (in formato ASCII). 



Figura 3-6 Comando MERGE 

Dove 

11 file identifier può essere una costante o una variabile stringa e 
specifica un file programma in formato ASCII, cioè registrato con 
1'opzione A. 


Esempi 


VIDEO 


COMMENTI 


MERGE "1:Fnew/FnewPASS" 

K£1 


si fa il MERGE tra il programma Fnew con la 
password FnewPASS e il programma in memoria. 


Nota: 11 dischetto è inserito nella unità 1 
ed è abilitato. 
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MERGE "V001/VP001:F001/ 
P001" Min 


si fa il MERGE tra il programma F001 con la 
password P001 e il programma in memoria. 


Nota : In questo caso il disco V001 viene 
abilitato dal comando MERGE con l’uso della 
password VP001. 


Nota 

MERGE chiude tutti i file dati eventualmente aperti dal programma 
residente in memoria e non ancora chiusi, azzera le variabili numeriche e 
inizializza le variabili stringa col valore stringa nulla. 


COME LISTARE I NOMI DEI FILE REGISTRATI SU DISCO 

Se l'utente non ricorda i nomi dei file programma e/o dati registrati su 
disco, può usare il comando F1LES. 

Questo comando può essere usato sia specificando un identificatore di 
volume che un identificatore di file. 

Quando l'utente specifica un identificatore di volume, tutti i file 
registrati su quel disco vengono listati (sia che abbiano o no una 
password). 

Per eseguire un comando F1LES non è necessario nè conoscere la password 
di volume nè che il disco venga abilitato. 

Quando l'utente specifica invece un identificatore di file, soltanto 
questo file viene listato e l'utente può anche non specificarne la 
passwoid (se esiste). 

La stesia funzione svolta dal comando F1LES può essere realizzata in PCOS 
tramite il comando VQU1CK. 

Nota: 11 comando F1LES non lista la password. 

11 comando F1LES permette di visualizzare: 

- l'unità disco, dove il disco stesso è inserito. 

- il nome del disco (se esiste) 
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- lo spazio libero su disco in settori (dove un settore è pari a 256 
byte). 

- il nome di ogni file su disco, oppure del file specificato, oppure il 
nome dei file selezionati se l'utente utilizza i caratteri "Jolly" (? o 
*) nell'identificatore di file. Si tenga presente che il punto 
interrogativo (?) identifica un carattere qualsiasi e che l'asterisco 
(*) identifica una qualsiasi sequenza di caratteri. 


F1LES (PROGRAMMA/IMMEDIATO) 

Lista i file registrati sul disco specificato. 



Figura 3-7 Comando FILES 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

volume identifier 


può essere una costante o una variabile stringa 
e specifica il disco di cui si richiede di 
listare i file 

file identifier 


può essere una costante o una variabile stringa 
e specifica il file di cui si richiede di 
visualizzare il nome e l'estensione (in byte) 
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Esempi 


SE l'utente imposta... 

ALLORA... 

F1LES Iti 

viene visualizzato il nome di ogni file residen¬ 
te sul disco inserito nell'unità selezionata per 
ultima. 

F1LES "0:" Iti 

viene visualizzato il nome di ogni file residen¬ 
te sul disco inserito nella unità 0. 

F1LES "10." Iti 

viene visualizzato il nome di ogni file residen¬ 
te su hard disk. 

F1LES "MYVOL:" Iti 

viene visualizzato il nome di ogni file residen¬ 
te sul disco MYVOL. Esso può essere inserito sia 
nella prima che nella seconda unità. 

F1LES "MYVOL/MYPASS:" 

Iti 

viene visualizzato il nome di ogni file residen¬ 
te sul disco MYVOL che ha la password MYPAS5. 
Esso può essere inserito sia nella prima che 
nella seconda unità. L'utente può specificare o 
meno la password di volume: ciò non é rilevante 
per l’esecuzione di questo comando. 

F1LES "MYF1LE" Iti 

viene visualizzato il nome del file MYF1LE, che 
è residente sul disco inserito nell'ultima 
unità selezionata. 

F1LES "1 :*.cmd" Iti 

viene visualizzato il nome di tutti i file 
che hanno l'estensione 'cmd' e che risiedono 
sul dischetto inserito nell'unità 1. 

F1LES "0:V???" Iti 

viene visualizzato il nome di tutti i file 
che risiedono sul dischetto inserito nell'unità 
0 e che soddisfano alle seguenti condizioni: 

- il nome inizia con la lettera 'V' 

- il nome é composto da quattro caratteri 
























































4. I DATI 




SOMMARIO 


In questo capitolo prenderemo in considerazione come il linguaggio BASIC 
tratta i dati. Esamineremo le costanti e le variabili, la rappresentazio¬ 
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I DATI 


COSTANTI E VARIABILI 

1 dati che un programma BASIC può prendere in considerazione, possono 
essere delle costanti o delle variabili. 


COSTANTI 

Se in un'istruzione BASIC compare un numero (ad es. 15, -2, 3.41 ecc.), o 
una stringa di caratteri (ad es. "AAA.bl", "Cursor***"), questo numero o 
questa stringa sono considerati costanti. Ciò significa che i loro valori 
non variano durante l'esecuzione del programma. 

VARIABILI 

Una variabile è un dato al quale è stato associato un nome. Il valore del 
dato può quindi cambiare durante l'esecuzione del programma. 

Per es., la formula che calcola l'area di un cerchio: 

3.141592*R A2 

utilizza la variabile R, che rappresenta qualsiasi valore del raggio, e 
riserva una posizione di memoria per questo valore. 

Nota: Il simbolo A è un operatore che indica che R deve essere elevato 
alla potenza specificata (nel nostro caso 2). 


NOMI DELLE VARIABILI 

L'identificatore (o nome) di una variabile non può essere più lungo di 40 
caratteri. I caratteri ammessi possono essere lettere e numeri. 11 punto 
(.) è pure ammesso. Il primo carattere deve essere una lettera, e 
l'ultimo può essere sia una lettera, sia un numero, sia un punto, sia un 
carattere di dichiarazione di tipo (%,!,#,$). 11 significato di un 
carattere di dichiarazione di tipo verrà spiegato più avanti in questo 
stesso capitolo. 

Le lettere minuscole, eventualmente presenti in un identificatore di 
variabile, sono considerate equivalenti alle corrispondenti lettere 
maiuscole e vengono convertite in lettere maiuscole quando si lista il 
programma. 

Esempi di nome di variabile sono: 

STUDENTE Al CC01.CLASSE ACCONTO# A$ STRINGA. 
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Parole Riservate 


Una parola riservata (una parola chiave, il nome di un comando o di una 
funzione) non può essere usata come identificatore di una variabile, ma 
il BASIC consente di inserire parole riservate all'interno, all'inizio o 
alla fine di un identificatore di variabile. Per es.: 

10 PERFORMACE = 105.3 
20 SINGLE = 1371.2 

sono linee di programma corrette, anche se PERFORMANCE contiene la parola 
chiave FOR, e SINGLE inizia con il nome della funzione SIN. 


RAPPRESENTAZIONE DEI NUMERI 


L’uomo é abituato a pensare i numeri in base 10 (rappresentazione 
decimale). Un computer considera invece i numeri come stringhe di bit 
(dove ogni bit può avere il valore 0 oppure 1), ed esegue la maggior 
parte delle sue operazioni trattando i numeri in base 2 (rappresentazione 
binaria). 

Questo paragrafo traccia una panoramica dei concetti di base della 
rappresentazione dei numeri in base 2, in base 16 e in base 8. 


RAPPRESENTAZIONE BINARIA 

Prima di parlare della rappresentazione binaria, esaminiamo brevemente la 
struttura della rappresentazione decimale. La rappresentazione decimale 
usa le cifre 0,1,2,...9. Ad esempio, prendiamo in considerazione il 
numero: 

205 

Vediamo che le sue cifre hanno un valore di posizione associato alla 
potenza del 10. Infatti questo numero può essere pensato come: 

(2 x 10 2 ) + (0 x 10 1 ) + (5 x 10 0 ) 

11 concetto di valore di posizione esiste anche nella rappresentazione 
binaria. L'unica differenza é che vengono prese in considerazione le 
potenze del 2, anziché quelle del 10. 11 numero 205 in base 2 é: 
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11001101 

Si noti che in base 2, le cifre ammesse sono soltanto "1" e "0". Quindi 
la predetta rappresentazione binaria significa: 

(1 X 2 ? ) + (1 x 2 6 ) + (0 x 2 5 ) + (0 x 2 4 ) + (1 x 2 3 ) + (1 x 2 2 ) + 

(0 x 2 1 ) + (1 x 2*) 

cioè: 

128 + 64 + 8 + 4 + 1 = 205 

Una cifra binaria viene denominata bit. Un bit può essere "1” o "0". 

Byte 

Le stringhe di bit vengono solitamente suddivise in gruppi di 8 bit. Un 
gruppo di 8 bit, considerato come una singola unità di informazione, 
viene denominata "byte”. 

1 bit di un byte sono numerati da 0 (il primo a destra, cioè il meno 
significativo) a 7 (il primo a sinistra, cioè il più significativo). 

In base a questa convenzione, il numero del bit e la potenza del 2 che 

rappresenta sono identici. La seguente tabella fa vedere il numero di 

posizione di un bit nell'ambito del byte e il suo valore corrispondente. 


NUMERO DI POSIZIONE 

BIT 

7 

BIT 

6 

BIT 

5 

BIT 

4 

BIT 

3 

BIT 

2 

BIT 

1 

BIT 

0 

Significato 

2 ? 

2 6 

2 5 

2 4 

2 3 

2 2 

2 1 

2* 

Valore 

128 

64 

32 

16 

8 

4 

2 

1 


Tabella 4-1 


BASE 10 

BASE 2 

0 

0 

12 

1100 

27 

11011 

149 

10010101 

255 

11111111 


Tabella 4-2 Esempi di conversione 
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Word 


L'M20 elabora 16 bit (2byte) per volta. Questa quantità é detta "word". 

Il numero di bit in una word può variare da macchina a macchina. I bit 
di una word sono numerati da 0 (quello più a destra, cioè il meno signi¬ 
ficativo) a 15 (quello più a sinistra, cioè il più significativo). 

Un'altra caratteristica di una word nel sistema M20 è che viene usata 
la rappresentazione "completamento a due". Questa rappresentazione con¬ 
sente di memorizzare in una word sia numeri positivi che negativi: 


SE un numero intero é.. 


ALLORA .... 

E la word é ... 

positivo 


il bit 15 é 0 

un numero positivo 
rappresentato in bina¬ 
rio 

negativo 


il bit 15 è 1 

un numero negativo 
rappresentato in "com¬ 
pletamento a due". 


Per trovare il valore assoluto di un numero negativo, bisogna invertire 
tutti i suoi bit e aggiungere 1. 


Per esempio- 


1111100110011000 valore originario (negativo) 


Invertendo tutti i bit 


0000011001100111 valore invertito 


Aggiungendo 1 


0000011001101000 Valore assoluto (valore invertito + 1) 
Sicché il valore della configurazione di bit sopra specificata è: 
-1640 
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RAPPRESENTAZIONE ESADECIMALE E OTTALE 

Abbiamo visto che è possibile rappresentare: numeri in base 10 (rappre¬ 
sentazione decimale) e in base 2 (rappresentazione binaria). Il BASIC 
permette anche di rappresentare: numeri in base 8 (rappresentazione 
ottale) e in base 16 (rappresentazione esadecimale). 

Sebbene sia spesso conveniente trattare i numeri in base 2, è difficile 
per l'utente scriverli e leggerli in questa rappresentazione. Per questa 
ragione l'utente preferisce convertirli in base otto o in base sedici. 

- Base 8, conosciuta come "rappresentazione ottale", usa una cifra ottale 
per tre cifre binarie 

- Base 16, conosciuta come "rappresentazione esadecimale", usa una cifra 
esadecimale per 4 cifre binarie. 

La seguente tabella illustra la rappresentazione in base 10 (decimale), 
in base 2 (binaria), in base 8 (ottale), e in base 16 (esadecimale) dei 
numeri da 0 a 16. 


DECIMALE 

BINARIA 

OTTALE 

DECIMALE 

BINARIA 

ESADECIMALE 

0 

000 

0 

0 

0000 

0 

1 

001 

1 

1 

0001 

1 

2 

010 

2 

2 

0010 

2 

3 

011 

3 

3 

0011 

3 

4 

100 

4 

4 

0100 

4 

5 

101 

5 

5 

0101 

5 

6 

110 

6 

6 

0110 

6 

7 

111 

7 

7 

0111 

7 

8 

1000 

10 

8 

1000 

8 

9 

1001 

11 

9 

1001 

9 

10 

1010 

12 

10 

1010 

A 

11 

1011 

13 

11 

1011 

8 

12 

1100 

14 

12 

1100 

C 

13 

1101 

15 

13 

1101 

D 

14 

1110 

16 

14 

1110 

E 

15 

1111 

17 

15 

1111 

F 

16 

10000 

20 

16 

10000 

10 


Tabella 4-3 
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CLASSIFICAZIONE DELLE COSTANTI 


11 modo in cui il BASIC memorizza un dato determina: 

- lo spazio in memoria che il dato occupa (in byte) 

- la velocità con cui il BASIC elabora il dato. 


DATI NUMERICI 

L'utente può far si che il BASIC memorizzi i numeri del proprio programma 
come: 

- numeri interi (massima velocità di elaborazione ma limitato campo di 
definizione) 

- numeri in semplice precisione (di uso generale) 

- numeri in doppia precisione (massima precisione ma elaborazione più 
lenta). 



NUMERI 

INTERI 

NUMERI IN 

SEMPLICE 

PRECISIONE 

NUMERI IN 

DOPPIA 

PRECISIONE 

Spazio in 
memoria 




(in byte) 

2 

4 

8 

Campo di 

Da -32768 

Da + 1(f 38 

Da + Kf* 8 

definizione 

a 32767 

a + 10 38 

Ot 

'1 i 

$ 

e» 

Cifre signi¬ 
ficative 

Massimo 5 

Massimo 7 

Massimo 16 

Cifre visua- 

Massimo 5 

Massimo 6 

Massimo 15 

lizzate 


(con arroton- 

(con ar- 

(PR1NT/LPR1NT) 


damento) 

rotonda- 

mento) 


Tabella 4-4 
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I DATI 


Nota : Gli zeri non significativi non vengono visualizzati. Per esempio il 
valore 3.410000 in semplice precisione verrà visualizzato come 3.41. 


DATI STRINGA 

Le stringhe (sequenze di caratteri ASCII) sono utilizzate per memorizzare 
informazioni non numeriche, come nomi, indirizzi, codici,ecc. Per esempio 
la costante: 

"FORD .RENAULT" 

è una costante stringa di 13 caratteri. Ogni carattere della stringa 
(compreso lo spazio) è memorizzato in un byte e corrisponde a un codice 
della tabella ASCII. Il BASIC memorizza la suddetta costante stringa come 
segue: 


Carattere 

ASCII 

F 

0 

R 

D 

, R 

E 

N 

A 

U 

L 

T 

Codice 

Esadecimale 

46 

4F 

52 

44 

20 2C 52 

45 

4E 

41 

55 

4C 

54 


Tabella 4-5 


La lunghezza massima di una stringa è di 255 caratteri. Una stringa con 
lunghezza zero è detta stringa "nulla", ed è rappresentata da una coppia 
di virgolette (""). Il BASIC memorizza le stringhe in modo dinamico, cioè 
lo spazio in memoria riservato ad una stringa può variare durante 
l'esecuzione del programma da 0 a 255 byte. 



STRINGA NULLA 

STRINGA DI 
n CARATTERI 

STRINGA DI MAS¬ 
SIMA LUNGHEZZA 

Spazio in memoria 
(in byte) 

0 

n 

255 

Campo di 
definizione 

- 

Qualsiasi stringa di caratteri stam¬ 
pabili ASCII, spazio compreso 


Tabella 4-6 
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DETERMINAZIONE DEL TIPO DI UNA COSTANTE 


SE... 

ALLORA... 

ESEMPI 

il valore è compre- 

è una stringa 

"NO" 

so tra due virgolette 


"YES" 

"Circle" 

""(stringa nulla) 

il valore non è 

è un numero 

521 

compreso tra due 
virgolette 

Nota: Un'eccezione a 
questa regola si ha 
quando 1' operato - 
re introduce un dato 
in risposta a una 
istruzione di INPUT o 
LINE INPUT, e nelle 
istruzioni DATA 

-15 

3.7345E-2 

43# 

un numero è intero 

è una costante 

1024 

ed è compreso tra 

intera 

721 

-32768 e 32767 


-32768 

il valore ha il 

è una costante 

&H20F0 

prefisso 8H, ed è 

esadecimale 

&HF1 

composto dai nume¬ 
ri da 0 a 9 e dalle 
lettere da A a F 
(compreso tra 0 e 
FFFF) 

Nota: una costante 
esadecimale può 
essere considerata 
come una rappre - 
sentazione alterna¬ 
tiva della corri -- 
spondente costante 
intera 

&H35 

&HFE98 

&HFFFF 

&H0 



il valore ha il 

è una costante 

&O70 

prefisso &0 o & ed 

ottale 

&044 

è composto dai nu¬ 
meri da 0 a 7 (com¬ 
preso tra 0 e 177777) 

Nota: una costante 
ottale può essere 
considerata una 

&71175 


rappresentazione 
alternativa della 
corrispondente co¬ 
stante intera 
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I DATI 


un numero non è un 
numero intero e non 
contiene più di 

7 cifre 

è una costante in 
semplice precisione 

-2.3 

32768 

45.314 

-65000 

un numero contie¬ 
ne più di 7 cifre 

è una costante in 
doppia precisione 

52174593 

-54.397124 

8.799999999 


CARATTERI DI DICHIARAZIONE TIPO 

L'utente può forzare il tipo di una costante aggiungendo, alla fine di 
una costante numerica i seguenti caratteri di dichiarazione: 


CARATTERI DI 
DICHIARAZIONE 

SIGNIFICATO 

ESEMPI 


dichiara un numero 
in semplice preci¬ 
sione 

5.72110333! 

la costante è in sem¬ 
plice precisione e solo 
le prime 7 cifre (per 
es. 5.721103) vengono 
memorizzate. 

E 

semplice precisione 
"floating point". E 
indica che la costan¬ 
te deve essere 
moltiplicata per una 
potenza del 10, in¬ 
dicata dopo la E 

7.31E4 significa 

7.31 x 10^ cioè 

73100 

# 

dichiara un numero 
in doppia precisione 

4 # 

5.21# 

D 

doppia precisione 
"floating point". D 
indica che la costan¬ 
te deve essere molti¬ 
plicata per una 
potenza del 10, in¬ 
dicata dopo la D 

7.2D-3 significa 

7.2 x 10 3 cioè 

0.0072 


























CLASSIFICAZIONE DELLE VARIABILI 


Ogni identificatore di variabile che appare in un programma viene 
classificato dal BASIC o come una stringa, o come un numero intero, o 
come un numero in semplice o doppia precisione. 

Se non viene specificato altrimenti, il BASIC classifica tutte le 
variabili numeriche in semplice precisione. Per esempio, se questa è la 
prima linea del nostro programma: 

10 X1=3.5 

11 BASIC classifica XI come una variabile in semplice precisione. 

Tuttavia, l'utente può attribuire tipi diversi alle variabili sia usando 
istruzioni di definizione di tipo sia scrivendo un carattere particolare, 
atto a dichiarare il tipo, alla fine dell'identificatore di variabile. 


DEF1NT/DEFSNG/DEFDBL/DEFSTR (PROGRAMMA/IMMEDIATO) 

Esistono in BASIC quattro istruzioni di definizione di tipo. 

Un'istruzione di definizione di tipo dichiara il tipo di tutte le 
variabili il cui nome inizia con una lettera ben specificata. 

Queste istruzioni vengono inserite di solito all'inizio del programma e 
devono precedere l'uso delle variabili di cui definiscono il tipo. 




f 





J ,r\ , 

letter 


^ MI . J 




-y 

^►TdefsngV-' 



_ r\ 


V 

^-►(defdbl)-^ 


vi/ 



^-►(defstr}-^ 






Figura 4-1 Istruzioni di Definizione di Tipo 
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I DATI 


Valori di Default 

Se non specificato altrimenti, tutte le variabili vengono assunte in 
semplice precisione. 

Esempi 


SE l'utente imposta... 

ALLORA... 

10 DEF1NT A-Z lì* 

tutte le variabili del programma saranno numeri 
interi 

10 DEFDBL D Iti 

tutte le variabili del programma che iniziano 
con la lettera D saranno in doppia precisione 

10 DEFSTR S.U-UI EH 

tutte le variabili del programma che iniziano 
con le lettere S, U, V e U saranno variabili 
stringa 


CARATTERI DI DICHIARAZIONE DI TIPO 

Come già abbiamo visto per le costanti, l'utente può forzare il tipo di 
una variabile aggiungendo alla fine del nome un carattere di dichiara¬ 
zione. Per le variabili abbiamo quattro caratteri di dichiarazione di 
tipo: 


CARATTERE DI 
DICHIARAZIONE 

SIGNIFICATO 

ESEMPI 

% 

variabile intera 

A% 

STEP% 

INCREMENTI, 

sono tutte variabili 
intere, indipendente¬ 

mente da eventuali i- 
struzioni di defi¬ 

nizione di tipo per le 
variabili che iniziano 
con A, S e I. 
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1 

variabile in semplice 
precisione 

SPEEO! 

SPACE! 

TIME! 

sono tutte variabili in 
semplice precisione, 

indipendentemente da 

eventuali istruzioni di 
definizione di tipo per 
le variabili che ini¬ 
ziano con le lettere S 
e T. 

# 

variabile in doppia 
precisione 

TOTAL# 

SUBTOTAL# 

XI# 

sono tutte variabili in 
doppia precisione, in¬ 
dipendentemente da 

eventuali istruzioni di 
definizione di tipo per 
le variabili che ini¬ 
ziano con le lettere T, 

S e X. 

$ 

variabile stringa 

A$ 

B1 $ 

NAME.CLASS$ 

sono tutte variabili 
stringa, indipen¬ 

dentemente da eventuali 

istruzioni di tipo per _„ 

le variabili che ini¬ 
ziano con le lettere A, 

B e N. 


CONVERSIONI NUMERICHE 


Spesso in un programma o in una linea ad esecuzione immediata si assegna 
una costante di un certo tipo ad una variabile di tipo diverso. 

Per esempio, se si imposta: 

1% = 5.31 «;■ 
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1 DATI 


il BASIC arrotonderà per prima cosa la costante 5.31 ( in semplice 

precisione) all'intero più vicino. Questo numero verrà poi assegnato alla 
variabile intera 1%. Perciò il valore della variabile 1% sarà 5. 

Si può anche assegnare a una variabile di un certo tipo una variabile di 
tipo diverso, come ad esempio: 

SCALE! = B° B1 
SECONDS! = CI# I£1 
BOX# = U% 1*:» 

Le procedure di conversione sono elencate nelle pagine seguenti. 


DA PRECISIONE SEMPLICE 0 DOPPIA A INTERO 

11 BASIC converte il valore in semplice o doppia precisione a un intero 
arrotondando la parte frazionaria. 

Nota : 11 valore ottenuto deve essere maggiore o uguale a -32763, 

e minore di 32767, altrimenti si ha un errore di Overflow. 


Esempi 

VIDEO 

COMMENTI 

C% = -15.1 

Ok 

?C% 

-15 

Ok 

il valore -15 è assegnato alla variabile C% 

C% = 4.1E2 

Ok 

?C% 

410 

Ok 

il valore 410 è assegnato alla variabile C% 

« = 47.8 

Ok 

?C% 

48 

Ok 

il valore 48 è assegnato alla variabile C% 
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C% = 7.21473D-3 

Ok 

?C% 

0 

Ok 


il valore 0 è assegnato alla variabile C% 

C% = -32768.5 


errore di Overflow 

Overflow 



Ok 




DA INTERO A PRECISIONE SEMPLICE 0 DOPPIA 

In questo caso la conversione non comporta errori, e il valore convertito 
corrisponde al valore originario esteso con zeri alla destra del punto 
decimale. 


VIDEO 

COMMENTI 

S! = 326 

il numero 326 è memorizzato nella variabile S! 

Ok 

come 326.0000, ma visualizzato come 326. 

?S! 


326 


Ok 


D# = 326 

il numero 326 è memorizzato nella variabile D# 

Ok 

come 326.0000000000000^ ma viene visualizzato 

?D# 

come 326. 

326 


Ok 



DA SEMPLICE A DOPPIA PRECISIONE 

Il BASIC aggiunge degli zeri alla fine di un numero in semplice precisione. 
Se il valore originario: 

- ha una rappresentazione binaria esatta, la conversione non comporta 
errori 

- non ha una rappresentazione binaria esatta, un errore aritmetico viene 
introdotto al momento della conversione. 
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Esempi 


VIDEO 

COMMENTI 

8# =1.5 

Quando si introduce B# = 1.5, viene assegnato 

Ok 

il valore 1.500000000000000 alla variabile B# , 

?B# 

ma questo valore è visualizzato soltanto come 

1.5 

1.5 

Ok 



Nota: 1.5 ha una rappresentazione binaria esatta 

C # = 1.3 

Quando si introduce C# = 1.3, viene assegnato 

Ok 

il valore 1 .299999952316280 alla variabile C# , 

?C # 

ma questo valore è visualizzato soltanto come 

1.29999995231628 

1.29999995231628 

Ok 



Nota: 1.3 non ha una rappresentazione binaria 


esatta. 


Note 

Per evitare una perdita di precisione nei calcoli è buona norma di 
programmazione evitare ove possibile conversioni da semplice a doppia 
precisione nei programmi BASIC. 

Ad esempio, se si vuole assegnare un valore costante a una variabile in 
doppia precisione, conviene usare una costante in doppia precisione. 

Per esempio: 

B#= 1.3# B#= 1.3D 

memorizzano entrambe 1.3 nella variabile B#. 

Quando il valore in singola precisione è memorizzato in una variabile, è 
allora necessario (per evitare una perdita di precisione) convertire 
prima la variabile in semplice precisione a un valore stringa con la 
funzione STR$ (vedi Capitolo 9) e quindi convertire di nuovo la stringa 
risultante in un numero con la funzione VAL (vedi Capitolo 9). 
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VIDEO 

COMMENTI 

LIST 

10 B ! =1.3 

20 B# =B! 

30 PRINT B# 

Ok 

RUN 

1.24999995231628 

Ok 

Questo programma visualizza il 
valore di B# con una perdita di 
precisione 

LIST 

10 B ! =1.3 

20 B# =VAL(STR$(B! )) 

30 PRINT B# 

Ok 

RUN 

1.3 

Questo programma visualizza il 
valore di B# senza perdite di 
precisione 


DA DOPPIA A SEMPLICE PRECISIONE 

Questa operazione consiste nel convertire un numero che ha al massimo 16 
cifre significative in un numero che non ne ha più di 7. 

Saranno prese in considerazione soltanto le prime sette cifre del valore 
originario con arrotondamento dell'ultima cifra. 

Prima di visualizzare o stampare tale numero il BASIC lo riduce, sempre 
con arrotondamento a 6 cifre. 

Nota : Se il valore in doppia precisione è fuori dal campo di definizione 
dei valori in semplice precisione, si ha un errore di Overflow. 


Esempio 


VIDEO 


COMMENTI 

P! = 2.03999996 


il valore 2.040000 viene assegnato 

Ok 


alla variabile P!, ma questo valore 

?P! 


viene visualizzato soltanto come 

2.04 


2.04 

Ok 
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I DATI 


CONVERSIONI ILLECITE 

L'utente non può convertire valori numerici in valori stringa, o 
viceversa, mediante un'istruzione di assegnazione. Per esempio: 

C$ = 321.7 

è una conversione che non è ammessa. (In questi casi le funzioni STR$ e 
VAL permettono di realizzare queste conversioni. Vedere Capitolo 9). 


VARIABILI CON INDICE E MATRICI 



Come predetto (Vedere Capitolo 1) una variabile può essere una "variabile 
semplice" oppure una "variabile con indice", cioè un elemento di 
"matrice" ("array"). 

Una "matrice" è un insieme di variabili dello stesso tipo, aventi tutte 

10 stesso nome ma distinguibili tramite il valore di uno o più indici 
indicati tra parentesi dopo il nome. Ad esempio, se A è il nome di una 
matrice a una dimensione, A(0) è il suo primo elemento, A(1) il secondo 
ecc.(supponendo che il valore minimo degli indici sia 0). 

11 valore di un indice deve essere un intero positivo, ma è possibile 
usare un'espressione numerica per esprimere il valore di un indice. Se il 
valore dell'espressione non fosse intero viene arrotondato automatica- 
mente all'intero più vicino. 

Una matrice può avere un numero qualsiasi di dimensioni. Una matrice a 
una dimensione può essere pensata come una lista di dati. Può avere più 
righe, ma una sola colonna. Una matrice a due dimensioni può essere 
passata come una tabella di dati. Può avere più righe e più colonne. 

Per definire una matrice, l'utente deve: 

- attribuire un nome alla matrice (le stesse regole specificate per i 
nomi delle variabili semplici, sono anche valide per i nomi delle 
matrici) 

- stabilire il valore massimo e il valore minimo degli indici. 

Per fare ciò, l'utente deve scrivere un'istruzione DIM ed eventualmente 
un'istruzione 0PT10N BASE. Se l'utente specifica nel suo programma: 

10 OPTION BASE 1 

11 valore minimo degli indici di tutte le matrici è 1. 
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Se, invece, nel programma non è presente alcuna istruzione 0PT10N BASE (o 
se è presente l'istruzione 0PT10N BASE 0), il valore minimo degli indici 
di tutte le matrici è 0. 

E' anche possibile ridefinire una matrice tramite una nuova istruzione 
01M, preceduta da una istruzione ERASE (che verrà spiegata in dettaglio 
nel seguito). 


MATRICI A UNA DIMENSIONE 

Supponiamo di avere la seguente lista di numeri: 

17, -9, 32, 105, -48 

Se definiamo una matrice numerica a una dimensione V, possiamo memorizza¬ 
re tutti i valori della lista come elementi di questa matrice e possiamo 
accedere a ciascun elemento tramite il valore del suo indice. 


Matrice V 


Elemento Contenuto 


V(0) 17 

V(1) -9 

V(2) 32 

V(3) 105 

1/(4) -48 

Ogni elemento della matrice V è individuato dal 
suo indice. Per esempio, il valore di V(1) è 
-9, e il valore di V(3) è 105. L’indice 
identifica la posizione dell'elemento all’in¬ 
terno della matrice. 


MATRICI A PIU' DIMENSIONI 

Possiamo definire una matrice a due dimensioni per memorizzare i valori 
di una tabella. Supponiamo di avere la seguente tabella: 


NOME 

CODICE 

NAZIONE 

SESSO 

Anna 

21SAA 

Gran Bretagna 

F 

Giovanni 

35ECK 

USA 

M 

Riccardo 

70WST 

Svezia 

M 


Tabella 4-7 
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I DATI 


Questa tabella comprende 3 righe e 4 colonne per un totale di 12 valori 
stringa. 

Se definiamo una matrice stringa A$, possiamo memorizzare tutti i valori 
della tabella come elementi di questa matrice e possiamo accedere a 
ciascun elemento tramite il valore dei suoi due indici. 


INDICE 

0 

1 

2 

3 

0 

Anna 

21SAA 

Gran Bretagna 

F 

1 

Giovanni 

35ECR 

USA 

M 

2 

Riccardo 

70UST 

Svezia 

M 


Tabella 4-8 Matrice A$ 


Ogni elemento della matrice A$ è individuato da due indici, racchiusi 
tra parentesi dopo il nome della matrice e separati da una virgola. 

11 primo indice rappresenta la riga e il secondo la colonna. Per esempio 
il valore di A$(0,1) è la stringa 21SAA, e il valore di A$(2,3) è il 
carattere M. 

E' anche possibile definire matrici con più di due dimensioni, ma queste 
sono usate molto di rado. 


DIM (PR0GRAMMA/1MMED1AT0) 


Specifica il nome di una matrice, il numero delle sue dimensioni e il 
valore massimo dell'indice per ogni dimensione. L’istruzione DIM può 
specificare una o più matrici. 



Figura 4-2 Istruzione DIM 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

VALORI DI DEFAULT 

array 


è il nome di una 
matrice (qualsiasi 
nome di variabile 
è consentito) 


upper bound 


è una qualsiasi co¬ 
stante numerica po¬ 
sitiva o una varia¬ 
bile numerica con 
valore positivo. Se 
questo valore non è 
intero viene arro¬ 
tondato all'intero 
più vicino. 

se non è presente alcu¬ 
na istruzione DIM, il 
valore massimo dell'in¬ 
dice per ogni dimensio¬ 
ne viene assunto pari a 
10, e il numero di 
dimensioni viene stabi¬ 
lito non appena si 
incontra un elemento 
della matrice nel pro¬ 
gramma. 


Esempio 


SE l'utente imposta... 


ALLORA... 


10 DIM A(5), B$(20,30) H I 


definisce una matrice A a una dimensione 
con l'indice compreso tra 0 e 5, e una 
matrice stringa a due dimensioni B$ con 
l'indice di riga compreso tra 0 e 20 e 
l'indice di colonna tra 0 e 30. 


Nota : A è una matrice numerica a meno che 
un'istruzione DEFSTR stabilisca altrimenti. 


Numero di Dimensioni 

In BASIC è possibile definire matrici con numero arbitrario di dimensioni 
(compatibilmente con la memoria disponibile), ma le matrici di uso più 
frequente hanno soltanto una o due dimensioni. 

Se l'utente non introduce alcuna istruzione DIM nel programma, la matrice 
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I DATI 


viene creata quando il BASIC incontra per la prima volta un suo elemento. 
In base al numero degli indici il BASIC può determinare il numero delle 
dimensioni. Per esempio, se in una istruzione compare: 

ARI(3,5,10) 

allora il BASIC crea la matrice ARI con tre dimensioni, e con un valore 
massimo dell'indice per ogni dimensione pari a 10. 


Numero di Elementi per Dimensione 


SE. .. 

E SE... 

ALLORA... 

nessuna istruzione 

DIM è presente 

viene specificato 

0PT10N BASE 0 

si hanno 11 elementi 
per ogni dimensione 
(indici tra 0 e 10) 

viene specificato 

0PT10N BASE 1 

si hanno 10 elementi 
per ogni dimensione 
(indici tra 1 e 10) 

è presente una 
istruzione DIM 

viene specificato 

OPTION BASE 0 

il numero di elementi 
per ogni dimensione è 
pari al valore massimo 
dell'indice + 1 

viene specificato 

OPTION BASE 1 

il numero di elementi 
per ogni dimensione è 
pari al valore dell’in¬ 
dice. 
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Definizione di una Matrice 


L'UTENTE DEVE 

E... 

OPPURE... 

stabilire il valore 
minimo degli indici 

può utilizzare l'i¬ 
struzione 0PT10N BASE 1 

può adottare il valore 
di default 0PT10N BASE 
0 

assegnare un nome 

alla matrice 

può utilizzare l'i¬ 
struzione DIM 

può far riferimento a 
un elemento della ma¬ 
trice nel programma. 

Nota: In questo caso il 
valore massimo dell'in¬ 
dice per ogni dimensio¬ 
ne risulta pari a 10. 

stabilire il nume¬ 
ro di dimensioni 

stabilire il valore 
massimo dell'indice 
per ogni dimensione 


Note 

- Una istruzione DIM inizializza a zero tutti gli elementi delle matrici 
specificate. 

- Una istruzione DIM deve precedere ogni riferimento ad elementi di 
matrice. 

- Una istruzione DIM non può stabilire il valore massimo dell'indice per 
dimensione, se il controllo dell'esecuzione salta le DIM. 

Esempio 


VIDEO 


LIST 
10 1=1 
20 GOTO 40 
30 DIM A(50) 
40 A(10)=3 
50 A(11)=45 
Ok 
RUN 


COMMENTI 


L'M20 visualizzerà il messaggio d'errore: 

Subscript out of range in 50 

quando viene eseguita l'istruzione 50, dato 
che l'istruzione 30 è stata saltata e il 
valore massimo dell'indice viene assunto 
pari a 10. 


Subscript out of range in 50 


Ok 
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ERASE (PROGRAMMA/IMMEDIATO) 


Libera lo spazio riservato a una o più matrici e rende disponibili i 
relativi nomi per nominare altre variabili del programma. 





Figura 4-3 Istruzione ERASE 


Esempio 


VIDEO 


COMMENTI 


10 DIM A(15,15),8(10,20) 


100 ERASE A,B 

110 01M A(100),B(2,2,2) 


dopo aver eseguito l'istruzione 100, lo spazio 
allocato per le matrici A e B viene rilascia¬ 
to. L'utente può allora definire altre varia¬ 
bili (in particolare matrici) con quegli 
stessi nomi: qui l'istruzione 110 definisce 
altre due matrici A e B con un diverso numero 
di dimensioni e con un diverso valore massimo 


degli indici. 


Note 

Di norme non è consigliabile riutilizzare un identificatore per altri 
scopi perchè può essere fonte di errori o può rendere il programma poco 
leggibile. 

Tuttavia il ridimensionamento di matrici può risultare, molto utile, ad 
esempio quando il nome di una matrice viene utilizzato da una subroutine 
e si vogliono passare a questa subroutine matrici con un diverso numero 
di dimensioni (o un diverso valore massimo degli indici). 
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OPTION BASE (PROGRAMMA/IMMEDIATO) 


Dichiara il valore minimo degli indici delle matrici. 



Figura 4-4 Istruzione OPTION BASE 

Valori di Default 

Se l'utente non scrive una istruzione OPTION BASE nel proprio programma, 
per default viene assunto OPTION BASE 0; pertanto il valore minimo degli 
indici delle matrici è per default 0. 


Esempio 


SE l'utente imposta... 


ALLORA... 


10 OPTION BASE 1 B1 


il valore minimo degli indici è 1. 


OPPURE 


OPTION BASE 1 
(in modo immediato) 


Note 

L'istruzione OPTION BASE 1 può essere utile soprattutto per convertire 
verso l’M20 programmi BASIC scritti per essere eseguiti su altri sistemi. 
Alcune versioni del linguaggio BASIC infatti accettano come valore minimo 
degli indici soltanto il valore 1. 

L'istruzione OPTION BASE non può essere preceduta da un'istruzione DIM o 
da un riferimento a un elemento di matrice. 
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5. COME VENGONO INTRODOTTI I DATI IN BASIC 



SOMMARIO 


Questo capitolo si propone di descrivere alcune modalità con le quali 
vengono forniti in BASIC i dati al computer. 

Verranno prese in esame: 

- le istruzioni CLEAR, LET e SUAP 

- le istruzioni INPUT e LINE INPUT 

- le istruzioni DATA, READ e RESTORE 

Altre modalità di introduzione dei dati (che comportano l'utilizzazione 
dei file esterni) saranno esaminate successivamente (vedere il Capitolo 


12 ). 

INDICE 

ISTRUZIONI DI ASSEGNAZIONE 5-1 

CLEAR (PROGRAMMA/IMMEDIATO) 5-1 

LET (PROGRAMMA/IMMEDIATO) 5-3 

SWAP (PROGRAMMA/IMMEDIATO) 5-5 

IL FILE DATI INT ERNO 5-6 

DATA/READ/RESTORE (PROGRAMMA) 5-6 

ISTRUZIONI DI INPUT 5-9 

INPUT (PROGRAMMA) 5-10 

LINE INPUT (PROGRAMMA) 5-14 
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ISTRUZIONI DI ASSEGNAZIONE 

In BASIC vi sono tre istruzioni di assegnazione: 

- l'istruzione CLEAR che consente di azzerare le variabili numeriche e 
di inizializzare le variabili stringa al valore stringa nulla. 

- l'istruzione LET, che consente di assegnare il valore di una espres¬ 
sione ad una variabile. La variabile e l'espressione devono essere 
dello stesso tipo (entrambe numeriche o entrambe stringa). 

- l'istruzione SWAP, che consente di scambiare i valori di due varia¬ 
bili, purché siano dello stesso tipo (intera, in semplice precisione, 
in doppia precisione, stringa). 

Le istruzioni LET e SWAP vengono spesso utilizzate per eseguire calcoli 

immediati. 


CLEAR (PROGRAMMA/IMMEDIATO) 


Azzera tutte le variabili numeriche, inizializza le variabili stringa al 
valore stringa nulla, chiude tutti i file dati e tutte le finestre (v. 
capitolo 14) e azzera il video. E' anche possibile, con l'istruzione 
CLEAR, stabilire lo spazio di memoria dedicato al BASIC e quello 
dedicato allo stack. 



Figura 5-1 Istruzione CLEAR 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

memory 

rappresenta l'ammontare di memoria (in byte) 
disponibile per i programmi BASIC. 

La memoria, utilizzabile dal BASIC, può anche 
essere stabilita con il comando SBASIC del PCOS. 

Se il parametro memory viene omesso, il suo 
valore è quello stabilito con il comando SBASIC 
oppure 36800 byte (come seconda alternativa) 

stack 

stabilisce lo spazio, dedicato allo stack. 

Il valore di default è il valore minore tra 512 
byte e 1/8 della memoria disponibile. 


Lo stack è una parte della memoria dedicata al 
BASIC, utilizzata per memorizzare l'indirizzo di 
ritorno dei sottoprogrammi, delle funzioni ecc. 


Esempi 


VIDEO 

COMMENTI 

CLEAR 

azzera le variabili numeriche, inizializza le 
variabili stringa al valore stringa nulla, 
chiude i file dati e le finestre e azzera il 
video. 

La memoria può essere stata dimensionata in modo 
esplicito tramite il comando SBASIC oppure viene 
assunta per default pari a 36800 byte. 11 valore 
dello stack viene assunto per default. 

CLEAR ,32768 

come sopra, ma la memoria viene dimensionata a 
32768 byte. 
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CLEAR ,,2000 

come nel primo esempio, ma lo stack è stato 
dimensionato a 2000 byte. 

CLEAR ,32768,2000 

come nel primo esempio, ma la memoria viene 
dimensionata a 32768 byte e lo stack a 2000 
byte. 

Note 


All'inizio dell'esecuzione di un programma BASIC, tutte le variabili 
numeriche vengono azzerate e tutte le variabili stringa vengono 
inizializzate al valore stringa nulla (ad eccezione delle variabili 
definite nell'area COMMON in fase di CHAlNing di un programma ad un 
altro, vedere il Capitolo 11). Non è quindi necessario usare un'istru¬ 
zione CLEAR all'inizio del programma al solo scopo di azzerare le 
variabili numeriche e di inizializzare le variabili stringa al valore 
stringa nulla. 

11 BASIC alloca in modo dinamico lo spazio riservato alle stringhe. 
Viene visualizzata una segnalazione d'errore (Out of string space) nel 
caso in cui non ci sia memoria sufficiente per il BASIC. 


LET (PROGRAMMA/IMMEDIATO) 


Assegna un valore ad una variabile. 



Figura 5-2 Istruzione LET 

















Esempi 


SE l'utente imposta... 

ALLORA... 

LET K = 1.5 

il valore 1.5 è assegnato alla 
variabile numerica K 

LET X = K + 2 BOI 

il valore dell'espressione numeri¬ 
ca K + 2 è assegnato alla varia¬ 
bile numerica X 

A$(I ) = "ABC" B3 

il valore della costante stringa 
"ABC" è assegnato alla variabile 
stringa con indice A$(l) 

Nota: La parola chiave LET è 
opzionale 

Assegnazioni numeriche 


Se il valore dell'espressione numerica non è dello stesso tipo della 
variabile di destinazione (cioè la variabile che compare alla sinistra 
del segno di uguaglianza) il BASIC converte il tipo del valore dell'e¬ 
spressione in modo da renderlo uguale a quello della variabile di de¬ 
stinazione in base alle regole precedentemente descritte (vedere il 
paragrafo CONVERSIONI NUMERICHE del Capitolo 4). Se la variabile di 
destinazione non può contenere il valore calcolato, può verificarsi un 
arrotondamento oppure un overflow. 


Assegnazioni stringa 

L'assegnazione stringa viene effettuata trasferendo il valore dell'e¬ 
spressione stringa nella variabile di destinazione, carattere per 
carattere da sinistra a destra. L'operazione termina quando tutti i 
caratteri sono stati trasferiti. 


Note 

Non sono ammesse assegnazioni simultanee. Se ad esempio si impostasse: 
100 LET B% =C% = 0 BJ 
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il BASIC INTERPRETEREBBE IL SECONDO SEGNO DI UGUAGLIANZA COME UN 
OPERATORE DI CONFRONTO e assegnerebbe a B% il valore -1 (cioè vero) se 
C% è uguale a 0, ed il valore 0 (cioè falso) se C% è diverso da zero. 
(Per ulteriori dettagli sulle espressioni di confronto vedere il 
Capitolo 6). 


SWAP (PROGRAMMA/1MMED1ATO) 


Permette di scambiare i valori di due variabili semplici. L'istruzione 
SWAP può essere eseguita con qualsiasi tipo di variabile (intera, in 
semplice precisione, in doppia precisione, stringa), ma le due variabili 
devono essere dello stesso tipo, altrimenti verrà visualizzato l'errore 
"Type mismatch" (incompatibilità di tipo). Le variabili devono anche 
essere inizializzate, altrimenti verrà visualizzato l'errore "lllegal 
function cali". 



Figura 5-3 Istruzione SWAP 


Eseapio 


VIDEO 


COMMENTI 

LIST 

10 A$ = " ONE " 

20 B$ = " ALL" 

30 C$ = " FOR " 

40 PR1NT A$;C$;B$ 

50 SWAP A$;B$ 

60 PR1NT A$;C$;B$ 

Ok 

RUN 

ONE FOR ALL 

ALL FOR ONE 

Ok 


L'istruzione 50 esegue l'opera¬ 
zione di SWAP fra le variabili A$ 
e B$. L'istruzione 40 visualizza 
ONE FOR ALL, l’istruzione 60 
visualizza ALL FOR ONE. 
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IL FILE DATI INTERNO 


Molti problemi rendono necessaria l’introduzione di una grande quantità 
di dati nel computer. Per fare ciò, l'utente può utilizzare ripetu¬ 
tamente le istruzione LET, INPUT e LINE INPUT. 

E' evidente, però, che tale procedura può risultare, in certi casi, 
molto pesante. Un metodo molto più conveniente ed efficace per intro¬ 
durre dati è quello^di servirsi delle istruzioni DATA, READ e RESTORE. 

Le istruzioni DATA creano un file "interno", cioè una sequenza di dati 
(del programma), che devono essere trasferiti nelle variabili di pro¬ 
gramma con l'uso di una o più istruzioni READ. 

L'istruzione RESTORE riposiziona il puntatore ("pointer") all'inizio del 
file o al numero di linea specificato. 


DATA/READ/RESTORE (PROGRAMMA) 

DATA crea un file dati interno. 

READ legge i dati dal file interno (creato con una o più istruzioni 
DATA) e li assegna alle variabili specificate. 

RESTORE sposta il pointer all'inizio di un file dati interno o al numero 
di linea specificato. 



Figura 5-4 Istruzione DATA 



Figura 5-5 Istruzione READ 
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RESTORE 


>4 


line 

number 


Figura 5-6 Istruzione RESTORE 


Esempi 


VIDEO 


COMMENTI 


LIST 

10 READ A,B,C,D,E,F,G,H,I,J 
20 DATA 1,2,3,4,5,6,7,8,9,10 
30 PR1NT A;B;C;D;E;F;G;H;I;J 


i valori da 1 a 10 vengono 
assegnati a dieci variabili 


Ok 

RUN 

1 2 3 

Ok 


4 5 6 7 8 9 10 


LIST 

10 DATA 1,2,3,4 
20 READ A,B,C,D,E,F,G,H,I,J 
30 DATA 5,6,7 
40 DATA 8,9,10 

50 PRINT A;B;C;D;E;F;G;H;I;J 

Ok 

RUN 

123456789 10 

Ok 


le istruzioni 10, 20, 30 e 40 
hanno lo stesso effetto delle 
istruzioni 10 e 20 dell'esempio 
precedente. 

Nota : Un'istruzione DATA in un 
programma non deve necessaria¬ 
mente corrispondere ad una ben 
determinata istruzione READ. Ciò 
avviene perchè prima dell’e¬ 
secuzione di un programma viene 
creato un file dati (il file dati 
"interno"). Questo file contiene i 
valori relativi a tutte le istru¬ 
zioni DATA del programma secondo 
la sequenza dei numeri di linea. 
Nel corso dell'esecuzione del 
programma, l'istruzione READ ac¬ 
quisisce i suoi valori da questo 
file. 


► 
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LIST 

l'istruzione 10 assegna i valori 

10 READ A,B,C 

1,2,3 ad A,B e C, l'istruzione 40 

20 DATA 1,2,3,4,5,6,7,8,9,10 

assegna i valori 4,5,6 e 7 a 

30 PR1NT A ;B;C 

40 READ D,E,F,G 

D,E,F,G rispettivamente. 

50 PR1NT D;E;F;G 

Nota: Non è necessario leggere, 

RUN 

uno alla volta, i valori del file 

1 2 3 

4 5 6 7 

dati. 

Ok 


LIST 

l'M20 visualizza un messaggio di 

10 READ A,B,C,D,E 

20 DATA 1,2,3,4 

errore: 

Ok 

Out of data 

RUN 

Out of data 

e ritorna in Stato Comandi, perchè 

Ok 

ci sono più variabili che dati. 

LIST 

l'istruzione 10 fa si che alla 

10 READ A,B,C 

variabile A venga assegnato il 

20 DATA 15,25,35,5,6,12 

valore 15, a B il valore 25 e a C 

30 PR1NT A ;B;C 

il valore 35. L'istruzione RESTORE 

40 RESTORE 

della linea 40 fa si che i valori 

50 READ X,Y,Z 

vengano assegnati partendo nuova- 

60 PR1NT X;Y;Z 

mente dall'inizio del file. Quindi 

Ok 

l’istruzione 60 fa si che gli 

RUN 

stessi valori assegnati ad A,B,C 

15 25 35 

(15,25,35) siano assegnati rispet- 

15 25 35 

tivamente a X,Y,Z. 

Ok 

Se non si fosse utilizzata l'i¬ 
struzione RESTORE, ad X sarebbe 
stato assegnato il valore 5, ad Y 
il valore 6 e a Z il valore 12. 

LIST 

l'istruzione 10 fa si che ad XIS 

10 READ XI $,Y1S,ZI 

sia assegnato il valore DENVER, 

20 DATA "DENVER,", COLORADO, 80211 

(inclusa la virgola finale), ad 

30 PRINT XI $ ;Y1$ ; ZI 

Y1$ il valore COLORADO e a ZI il 

Ok 

valore 80211 . 

RUN 

DENVER,COLORADO 80211 

Nota: Le istruzioni READ possono 

Ok 

contenere sia variabili numeriche 
che variabili stringa. 
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Le istruzioni DATA possono conte¬ 
nere sia dati numerici che dati 
stringa. 

11 tipo di un dato in ingresso 
(nella sequenza dei dati) deve 
essere coerente al tipo di varia¬ 
bile alla quale deve essere asse¬ 
gnato; cioè le variabili numeriche 
richiedono, come dati, costanti 
numeriche (è consentita la conver¬ 
sione da un tipo numerico ad un 
altro, per esempio é possibile 
avere una costante in singola 
precisione associata a una varia¬ 
bile intera), mentre le variabili 
stringa richiedono dati stringa 
tra virgolette o senza virgolette. 
Una stringa deve essere tra virgo- 
lette se contiene virgole (ad 
esempio DENVER,) oppure spazi 
iniziali o finali (ad esempio lo 
spazio che precede COLORADO nel¬ 
l’istruzione 20 non viene assegna¬ 
to alla variabile Y1$ perchè 
COLORADO è una stringa non rac¬ 
chiusa tra virgolette). 


ISTRUZIONI DI INPUT 


L'istruzione DATA utilizza costanti per assegnare valori a variabili. 
Quando si introduce un programma, occorre conoscere quali valori si 
intendono assegnare. Inoltre i . .• ri contenuti nel file dati interno, 
sono registrati su disco insieme con il programma. Questi valori sono 
quindi permanenti e possono essere modificati solo cambiando una o più 
istruzioni DATA del programma. 

Le istruzioni INPUT e LINE INPUT offrono una maggior flessibilità in 
quanto consentono di introdurre valori solo al momento dell'esecuzione 
del programma. 
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Quando il controllo dell'esecuzione arriva su una di queste istruzioni, 
l’esecuzione del programma viene sospesa e l'M20 rimane in attesa di 
dati da tastiera. Dopo che il programma è stato registrato in memoria, è 
possibile eseguirlo ogni volta che lo si desideri ed è possibile fornire 
i valori al computer sul momento senza dover modificare il programma. 
Questa flessibilità consente, pertanto, di scrivere un programma 
generale atto a risolvere un problema particolare ancora prima di 
conoscere i valori specifici che il programma dovrà utilizzare. Se si 
devono, però, introdurre molti dati è preferibile utilizzare un file 
dati interno (dati permanenti) o uno o più file dati esterni (vedere il 
Capitolo 12). 

L'istruzione INPUT consente l'introduzione di uno o più dati numerici o 
dati stringa (separati da una virgola) che saranno assegnati alla 
variabile o alle variabili indicate nell'istruzione. 

L'istruzione LINE INPUT permette di introdurre un'intera linea di input 
e di assegnarla ad una variabile stringa. E' possibile inserire un 
messaggio atto a ricordare il significato dei dati da impostare 
(messaggio prompt) sia nell'istruzione INPUT che nella LINE INPUT; 
questo messaggio appare sul video quando l'istruzione viene eseguita. 


INPUT (PROGRAMMA) 


Legge dati da tastiera e li assegna ad una o a più variabili specifi¬ 
cate. 



Figura 5-7 Istruzione INPUT 


Un Punto Interrogativo 

Un punto interrogativo (seguito da uno spazio) viene automaticamente 
visualizzato come uno "standard prompt" in fase di esecuzione di 
un’istruzione INPUT, anche se l'istruzione non include la clausola 
"prompt string”. 
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VIDEO 

COMMENTI 

LIST 

10 INPUT X 

20 PR1NT X "SQUARED 1S" XA2 

30 END 

Ok 

RUN 

? 5 

5 SQUARED 1S 25 

Ok 

quando si esegue l'istruzione 10 
lo "standard prompt” (? ) viene 
visualizzato e con ciò si indica 
che il programma è in attesa di un 
dato. 

In questo caso non si utilizza la 
clausola "prompt string" nel¬ 
l’istruzione INPUT (vedere l’i¬ 
struzione 10). 


Self Prompting 


Inserendo una "prompt string" in 

una istruzione INPUT, l'utente può 


visualizzare il messaggio che desidera (self prompting) per ricordare il 
valore (o i valori) da introdurre. 


VIDEO 

COMMENTI 

LIST 

10 PI = 3.1415 

20 INPUT "Radius";R 

30 A = PI*RA2 

40 PR1NT "Area";A 

50 GOTO 20 

Ok 

RUN 

Radius? 7.4 

Area 172.029 

Radius? 

l'esecuzione dell'istruzione 20 fa 
visualizzare il messaggio Radius 
davanti allo standard prompt (? ) 

ecc. 
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Eliminazione dello Standard Pronpt 


L'utente può eliminare lo standard prompt (? ), scrivendo una virgola 
(anziché un punto e virgola)dopo il pronpt. 


VIDEO 


COMMENTI 

LIST 


lo standard prompt (?) viene 

10 INPUT "Date ", D$ 


eliminato perchè nell'istruzione 

20 PR1NT D$ 


10 la stringa "Date" (prompt 

Ok 


string) è seguita da una virgola 

RUN 


(,) anziché da un punto e virgola 

Date 30/Oct/69 


(;)• 

30/Oct/69 



Ok 




Eliminazione dell'Eco di 

L'utente può eliminare l'eco di E3 su video introducendo un punto e 
virgola (;) dopo la parola chiave INPUT. 


VIDEO 


COMMENTI 


LIST 

10 INPUT; ''Date";D$ 
20 PR1NT " J.C." 

Ok 

RUN 

Date? 30/Oct/69 J.C. 


l'eco su video del ritorno a 
capo/interlinea viene eliminato 
inserendo un punto e virgola (;) 
immediamente dopo la parola chiave 
INPUT (vedere l'istruzione 10). 


La successiva operazione PRINT/1N- 
PUT (vedere l'istruzione 20) sarà 
eseguita dalla successiva posizio¬ 
ne su video. 
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Introduzione di una Lista di Dati 

Una istruzione INPUT consente l'inserimento da tastiera di uno o più 
dati numerici o dati stringa. 


VIDEO 


COMMENTI 


LIST 

10 INPUT A,B$,C(3) 
20 PR1NT A ;B$;C(3) 
30 GOTO 10 
Ok 
RUN 

? 1.2,ABC,4 


quando si esegue l'istruzione 10 
l'utente deve introdurre tre dati. 
Il primo deve essere numerico 
(1.2), il secondo di tipo stringa 
(ABC) (non è necessario che sia 
tra virgolette), il terzo numerico 
(4). 


1.2 ABC 4 


? A8D,1.3,5 
?Redo from start 


Verranno assegnati rispettivamente 
alle variabili A,B$ e C(3). 


? 1.3.ABD.5 


1.3 ABD 5 
? AC 

Break in 10 
Ok 


Quando si esegue per la seconda 
volta l'istruzione 10 supponiamo 
di assegnare un dato non coerente 
(ABD), e cioè una stringa al posto 
di un numero. 11 sistema visualiz¬ 
za: 


? Redo from start 


e l'utente deve introdurre nuova¬ 
mente i dati. 


Per interrompere l’esecuzione del 
programma occorre premere U 


Per riprenderne l'esecuzione pre¬ 
mere hooogi 

Nota: Il tipo di dato, che viene 
introdotto da tastiera, deve es¬ 
sere dello stesso tipo della 
variabile di destinazione, cioè le 
variabili numeriche richiedono, 
come dati, costanti numeriche (è 
possibile la conversione da un 
tipo numerico ad un altro, ad 
esempio una costante in doppia 
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precisione può essere associata ad 
una variabile intera), e le varia¬ 
bili stringa richiedono, come 
dati, stringhe racchiuse o no tra 
virgolette. E' necessario che la 
stringa sia racchiusa tra virgo- 
lette se contiene virgole o spazi 
iniziali o finali. 

Valori numerici possono essere 
introdotti in variabili stringa 
tramite un’istruzione INPUT. Se 
introduciamo un numero in una 
variabile stringa, questo viene 
interpretato come la sequenza dei 
corrispondenti caratteri ASCII. 
Per riottenere il valore numerico, 
l'utente dovrà usare la funzione 
VAL (vedere il Capitolo 9), altri¬ 
menti si avrebbero errori di 
incompatibilità di tipo. 


? Redo from Start 

Se ad un richiesta di INPUT si risponde con troppi o con pochi dati, 
oppure con un dato di tipo non corretto (un dato stringa al posto di un 
dato numerico), su video verrà visualizzato il messaggio d’errore "? 
Redo from Start". Fin quando l'utente non fornirà una risposta corretta, 
non verrà assegnato alcun valore alle variabili. 


LINE INPUT (PROGRAMMA) 


Permette l'introduzione di una intera linea, fino al ritorno a capo/in¬ 
terlinea e la assegna ad una variabile stringa senza far uso di deli¬ 
mitatori (la lunghezza massima di una linea è di 255 caratteri). 



Figura 5-8 Istruzione LINE INPUT 
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COME VENGONO INTRODOTTI 1 DATI IN BASIC 


Un Punto Interrogativo all'interno di un Prompt 

Lo standard prorapt (? ) non compare quando si esegue una istruzione LINE 
INPUT. Se si desidera visualizzare il punto interrogativo si dovrà 
includerlo alla fine della clausola "prompt string". 


VIDEO 


COMMENTI 

LIST 


la stringa prompt (Name? ) viene 

10 LINE INPUT "Name? ";N$ 


visualizzata prima dell ' introdu- 

20 PR1NT "JONES" 


zione dei dati. 

Ok 



RUN 


Tutti i caratteri introdotti dalla 

Name? LINDA 


fine del prompt al WJvenaono 

JONES 


assegnati alla variabile stringa 

Ok 


(N$). 


Eliminazione dell'Eco di KÈ9 

E' possibile eliminare l'eco di su video introducendo un punto e 

virgola (;) subito dopo LINE INPUT. 


VIDEO 


LIST 

10 LINE INPUT;"Name? 
20 PR1NT " JONES" 

Ok 

RUN 

Name? LINDA JONES 
Ok 


";N$ 


COMMENTI 


l'eco sul video del ritorno a 
capo/interlinea viene eliminato 
inserendo un punto e virgola (;) 
subito dopo LINE INPUT (vedere 
l'istruzione 10). 


La prossima operazione PR1NT/1NPUT 
(vedere l'istruzione 20) incomin- 
cerà a visualizzare i caratteri 
dalla posizione successiva su 
video. 
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SOMMARIO 


Questo capitolo classifica le espressioni usate in BASIC in numeriche, 
stringa, di confronto o logiche. 

Vengono descritte le regole che l'utente deve rispettare nella formula¬ 
zione dell'espressione ed il livello di priorità che il BASIC assume nel 


loro svolgimento. 
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ESPRESSIONI 


ESPRESSIONI NUMERICHE 


La maggior parte dei programmi richiede una qualche forma di calcolo 
numerico. 

Come si è potuto notare negli esempi fatti, alla sinistra del segno di 
uguaglianza di un'istruzione LET appaiono solo variabili. 

Alla destra del segno uguale possono invece apparire sia variabili che 
costanti. Infatti, esse possono essere collegate da simboli speciali 
chiamati operatori, che indicano quale operazione numerica deve essere 
svolta. 

Si considerino i seguenti esempi: 

70 LET L=ACC0UNT 
60 LET Y = 16+1.7+12 
200 M = 83-44+37/N 
20 LET X = X+1 

L'ultima istruzione è di particolare interesse. La maggior parte delle 
istruzioni LET ha le caratteristiche delle equazioni algebriche, 
quest'ultima no. L'equazione X = X+1 è priva di significato da un punto 
di vista algebrico. 

L'istruzione LET assegna un valore ad una variabile: non implica che i 
valori su entrambi i lati del segno di uguaglianza siano matematicamente 
uguali. Quest'ultima istruzione è valida e significativa e può essere 
interpretata nel seguente modo: si aggiunga 1 al valore della variabile 
X e si assegni ad X questo nuovo valore. 11 nuovo valore di X sostituirà 
quello vecchio. 11 segno di uguale è un operatore. 

La parte dell'istruzione LET alla destra del segno di uguale si chiama 
espressione. L'espressione specifica quale valore deve essere assegnato 
alla variabile che si trova alla sua sinistra. (Lo svolgimento di una 
espressione porta ad un solo valore numerico). Una espressione numerica 
può essere composta da un solo numero o da una sola variabile numerica o 
da una combinazione di numeri e di variabili numeriche e operatori. Si 
deve però tenere presente che occorre assegnare un valore ad una 
variabile numerica prima che questa possa essere usata in una 
espressione. In caso contrario, alla variabile numerica viene automati¬ 
camente attribuito il valore 0. 

Alcuni esempi di espressioni numeriche sono presentati qui di seguito: 
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X 

X+Y+SPEED 

6.4A2 

-7+A/CYAR 


Operatori Numerici 

Come si è notato in precedenza, il BASIC si serve di operatori per 
definire le operazioni numeriche. Vi sono otto operazioni numeriche, 
ognuna caratterizzata da un proprio simbolo. 


SIMBOLO 

OPERAZIONE 


ESEMPI 

+ 

addizione 


X = 3.2 

Ok 

?X+1.1 

4.3 

Ok 

' 

sottrazione 


?X—1.3 

1.9 

Ok 

\ 

divisione tra interi 

Gli operandi sono arrotondati 
al numero intero più vicino 
(che deve essere compreso nel¬ 
l'intervallo da -32768 a 32767) 
prima di effettuare la divi¬ 
sione e anche il quoziente 
viene troncato al valore in¬ 
tero più vicino. 


?10\4 

2 

Ok 

? 25.68\6.99 

3 

Ok 

M00 

divisione modulo 

Fornisce quel numero intero 
che è il resto di una divisio¬ 
ne tra numeri interi 


?10.4 MOD 4 

2 

Ok 

(10/4=2 con resto 2) 

725.68 MOD 6.99 

5 

Ok 

(26/7=3 con resto 5) 
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★ 


moltiplicazione 


?X*3.92 

12.544 

Ok 

/ 


divisione 


T3/6.05 

0.495868 

Ok 

- 


cambiamento di segno 


?-X 





-3.2 





Ok 

A 


elevamento a potenza 


?XA3 

32.768 

Ok 


Note 

Accertatevi di usare il simbolo * quando si vuole eseguire una moltipli¬ 
cazione. In matematica, 6X è una espressione valida; nel linguaggio 
BASIC, si deve, invece, usare 6*X per esprimere la moltiplicazione per 
sei volte della variabile X. 

Per comodità, tutti gli operatori numerici usati in BASIC sono 
disponibili sia nella sezione numerica della tastiera dell'M20 che in 
quella alfanumerica (ad eccezione del simbolo di elevamento a potenza, 
che compare solo nella sezione alfanumerica, e di MOD che deve essere 
introdotto digitando i tre caratteri che lo compongono). 


Livello di Priorità degli Operatori Numerici 

Quando nell'ambito di una espressione vengono utilizzati due o più opera¬ 
tori, spesso si potrebbero verificare situazioni ambigue. Ad esempio, 
l'espressione: 

3*L - 6*W 

deve intendersi 

(3*L) - (6*W) 
oppure 

3*(L-6*W)? 
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11 linguaggio BASIC ha, però, dei livelli di priorità, che vengono segui¬ 
ti nell'esecuzione delle diverse operazioni numeriche. Le operazioni 
numeriche e i livelli di priorità vengono riportati qui di seguito (nel¬ 
l'ordine di priorità decrescente). 


LIVELLO DI PRIORITÀ’ 

OPERAZIONE 

COMMENTI 

IL PIU' ALTO 

elevamento a potenza 



cambiamento di segno 


moltiplicazione e 
divisione 

la moltiplicazione e 
la divisione hanno lo 
stesso livello di 

priorità 


divisione tra in¬ 
teri 



divisione modulo 


IL PIU' BASSO 

addizione e sottra¬ 
zione 

l'addizione e la sot¬ 
trazione hanno lo 

stesso livello di prio¬ 
rità 


Note 

Riferendoci all'esempio precedente, possiamo ora dire che l'espressione 
3*L - 6*W deve intendersi (3*L) - (6*W). 

Nel caso di operatori con la stessa priorità (ad. es. / e *) le 
operazioni vengono eseguite nell'ordine da sinistra a destra. Quindi, 
9/3*3 è l'equivalente di (9/3)*3: entrambe portano allo stesso risultato 
di 9. 


Uso delle Parentesi per Modificare il Livello di Priorità 

Si possono presentare dei casi in cui si vuole cambiare il livello 
normale di priorità con cui vengono eseguite le operazioni. Per ottenere 
questo, si devono usare le parentesi con le stesse modalità dell’alge¬ 
bra. In questo caso, il calcolo inizia con lo svolgimento delle 
operazioni racchiuse tra le parentesi più interne per poi passare via 
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via a quelle più esterne. All'interno di una coppia di parentesi, viene 
rispettato il livello normale di priorità delle operazioni. 

Qui di seguito viene presentato un semplice esempio di utilizzazione 
delle parentesi. 

2 

Supponiamo di voler calcolare (5X) . Se in BASIC questa espressione 
viene impostata sotto forma di 5*XA2, la X viene innanzi tutto elevata 
al quadrato, ed il risultato viene successivamente moltiplicato per 5, 
dal momento che l'elevamento a potenza ha un livello di priorità 
superiore alla moltiplicazione. Per modificare questa situazione, è 
sufficiente impostare l'espressione sotto forma di (5*X)A2. In questo 
caso, la X viene dapprima moltiplicata per 5 ed il risultato viene poi 
elevato al quadrato. 

E' evidente che l'equivalente in BASIC risulterà tanto più complesso 
quanto più complessa sarà l'espressione numerica. Negli esempi riportati 
qui di seguito, si evidenziano espressioni numeriche ed i loro 
equivalenti in BASIC. Tali esempi dovrebbero contribuire ad una più 
agevole comprensione delle regole di priorità. 


Esempi 


ESPRESSIONE 

NUMERICA 

EQUIVALENTE 

IN BASIC 

INTERPRETAZIONE 

x + y + z 

2 

(X+Y+Zl/2 

1. Sommare X,Y e Z 

2. Dividere la somma per 2 

y + z 

X+ 2 

X+(Y+Z)/2 

1. Sommare Y e Z 

2. Dividere la somma per 2 

3. Sommare X al risultato 

2x + 5 

2*X+5 

1. Moltiplicare X per 2 

2. Sommare 5 al risultato 

2(x + 4) 

2*(X+4) 

1. Sommare 4 e X 

2. Moltiplicare la somma per 2 

x 2 + 3 

XA2+3 

1. Elevare X al quadrato 

2. Sommare 3 al risultato 
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(x + 3) 2 

(X+3)A2 

1. Sommare 3 e X 

2. Elevare al quadrato il risultato 

(x + 3) 2 

4 

(X+3)A2/4 

1. Sommare 3 e X 

2. Elevare la somma al quadrato 

3. Dividere il risultato per 4 

2 

x x + y 

6 2 

(XA2/6)*((X+Y)/2)) 

1. Elevare X al quadrato e dividere 
il risultato per 6 

2. Sommare X e Y e dividere per 2 

3. Moltiplicare il primo risultato 
per il secondo 


Note 

E' buona norma di programmazione fare uso delle parentesi ogni volta che 
vi sono dubbi sullo svolgimento dell'espressione, anche quando esse non 
sono strettamente necessarie. 

Le espressioni usate in un programma, possono essere molto complesse. 
Nell'eventualità che un programma venga registrato in memoria e sia 
utilizzato solo sporadicamente, è facile dimenticare i calcoli che esso 
esegue. Per questo motivo, quando si scrive un programma è utile usare 
l'istruzione REM del linguaggio BASIC ed i campi commento. 


Tipo di Espressione 

Il tipo di un'espressione numerica, e cioè il tipo del risultato 
ottenuto dallo svolgimento di un'espressione (prima della sua assegna¬ 
zione ad una variabile) dipende dal tipo degli operandi. 

Si possono ipotizzare quattro situazioni a seconda del tipo dei due 
operandi in questione. 

L'espressione, nell'eventualità in cui in essa intervengano più di due 
operandi, può essere considerata come una serie di calcoli in cui 
intervengono due operandi. 

La tabella che segue fornisce un sommario delle quattro situazioni 
possibili. 
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SE. .. 

ALLORA... 

VIDEO 

entrambi gli operandi 
sono dello stesso 
tipo numerico (in¬ 
tero, in precisione 
semplice, in precisio¬ 
ne doppia) 

il risultato è dello 
stesso tipo degli 
operandi 

A# = 3.29745219 

Ok 

B n = 4.57297190-1 

Ok 

?A#+B# 

3.75474938 

Ok 

un operando è in¬ 
tero mentre l'altro 
è in semplice pre¬ 
ci sione 

il risultato è in 
semplice precisione 

1% = 25 

Ok 

C! = 4.2975 

Ok 

?1%-C! 

20.7025 

Ok 

un operando è in¬ 
tero mentre l'altro 
è in doppia pre¬ 
cisione 

il risultato è in 
doppia precisione 

?I%*A# 

82.43630475 

Ok 

un operando è in 
semplice precisione 
e l'altro in doppia 
precisione 

il risultato è in 
doppia precisione 

?C!/B# 

9.39760887993736 

Ok 


Arrotondamento, Overflow e Underflow 

I numeri ir\ virgola mobile costituiscono una forma di approssimazione 
dei numeri reali della matematica. 


SE. .. 

ALLORA... 

in un'espressione nu¬ 
merica, uno o più 
operandi sono in vir¬ 
gola mobile 

il calcolo è approssimato e si può perdere in 
precisione. In questo caso non si tiene conto 
delle cifre meno significative e l'ultima cifra 
considerata viene arrotondata. 


















il valore dell'espres¬ 
sione supera il valore 
massimo, che può esse¬ 
re memorizzato nella 
variabile ricevente 

viene visualizzato un messaggio di "Overflow"; 
come risultato viene fornito, con il segno 
algebrico corretto, l'infinito di macchina, 
dopo di che l'esecuzione continua 

viene eseguita 
una divisione per 

zero 

viene visualizzato il messaggio "Division by 
Zero"; come risultato della divisione viene 
fornito l'infinito di macchina con il segno del 
numeratore, dopo di che l'esecuzione continua. 

il calcolo di un 
elevamento a potenza 
dà luogo ad un va¬ 
lore nullo elevato 
ad una potenza nega¬ 
tiva 

viene visualizzato il messaggio "Division by 
Zero"; come risultato dell'elevamento a potenza 
viene fornito l'infinito di macchina, con segno 
positivo dopodiché l'esecuzione continua. 

il valore dell'espres¬ 
sione è minore del più 
piccolo valore rappre¬ 
sentabile 

il valore diviene zero (Underflow) dopo di che 
l'esecuzione continua. 

in un'assegnazione 
numerica, il tipo 
dell'espressione è 
diverso dal tipo 
della variabile ri¬ 
cevente 

il tipo dell'espressione viene, automaticamente, 
convertito al tipo della variabile ricevente. 


Nota : L'infinito di macchina viene visualizzato come 3.40282E+38. 

Valori non Definiti 

Qualora in una espressione numerica una variabile numerica non sia 
ancora stata inizializzata, essa viene inizializzata al valore zero. 

Forme Indeterminate 

Lo svolgimento di un'espressione numerica può sfociare in una forma 
indeterminata del tipo: 
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0/0 : viene visualizzato il messaggio "Division by Zero" e viene fornito 
il valore 3.40282E+38 (infinito di macchina). 

0A0: si assume un valore uguale ad 1. 


ESPRESSIONI STRINGA 


11 linguaggio BASIC consente l'utilizzazione di espressioni stringa che, 
per molti versi, sono analoghe alle espressioni numeriche appena 
esaminate. Una espressione stringa può essere o una costante stringa, o 
una variabile semplice stringa, o un elemento di una matrice stringa, o 
una funzione stringa o una concatenazione degli elementi suddetti 
mediante l'utilizzo del segno di addizione (+). 

Utilizzando questo segno, le stringhe possono essere "concatenate". Qui 
di seguito, vengono mostrati alcuni esempi di espressioni stringa usate 
nell'ambito di un'istruzione LET. 

50 LET A$ = "Chicago," 

90 8$ = "IL.," 

100 N$ = A$+B$+"USA" 

La concatenazione, indicata nell'istruzione 100, fa si che ad N$ venga 
assegnata la stringa 

Chicago,IL.,USA 

La lunghezza di una stringa risultante da una concatenazione di una o 
più stringhe è uguale alla somma della lunghezza delle singole stringhe. 
Lo svolgimento dell'espressione procede da sinistra verso destra. 

Si deve evitare di assegnare più di 255 caratteri ad una variabile 
stringa, altrimenti il sistema evidenzierà il messaggio d'errore: 

String too long 


Nota 

L'operando di una stringa che compare in una espressione stringa può 
essere la stringa nulla (""). La stringa nulla può anche essere il 
valore di default di una variabile stringa non inizializzata. 
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ESPRESSIONI DI CONFRONTO 


Una espressione di confronto paragona due espressioni numeriche o 
stringa mediante l'uso di operatori di confronto. 


Operatori di Confronto 

Gli operatori di confronto, elencati qui di seguito, sono: 

= uguale (il segno di uguale viene anche utilizzato per 

assegnare un valore ad una variabile, vedere 
l'istruzione LET) 

> maggiore di 

< minore di 

> = (oppure =>) maggiore di o uguale a 

< = (oppure =<) minore di o uguale a 

<> (oppure ><) non uguale a. 

Non è consentito confrontare una espressione numerica con una espres¬ 
sione stripga e viceversa. Ad esempio: 

A + B>C è valido 

C + D>=E+F è valido 

A$ = 8$ è valido 

B$>C1 non è valido, se CI è una variabile numerica. 


11 confronto tra numeri ha un significato ovvio. E' anche possibile il 
confronto di stringhe di caratteri. Esso dipenderà dal valore numerico 
della rappresentazione del carattere (che viene stabilita in base al 
valore decimale ASCII di ogni carattere nell'ambito di una stringa). Il 
confronto delle stringhe viene effettuato da sinistra verso destra, 
carattere per carattere e termina al primo carattere diverso. 11 
risultato del confronto è fatto in base a questi caratteri. 

Innanzi tutto vengono svolte le espressioni numeriche o stringa, poi 
vengono applicati gli operatori di confronto ai risultati di tali 
espressioni. 
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Ad esempio, lo scrivere 
A> B + C 

è equivalente allo scrivere 
A >(B + C) 

L'espressione di confronto fornisce un risultato numerico. Esso può 
essere -1 (se il confronto è vero) oppure 0 (se invece è falso). 


Esempi 

Consideriamo alcuni esempi, che prevedono l'uso di espressioni di 
confronto. Assegniamo, innanzi tutto, dei valori alle variabili X ed Y. 


VIDEO 


COMMENTI 

X=1 


11 BASIC esegue le assegnazioni specificate 

Ok 



Y=2 



Ok 



?X>Y 


11 BASIC visualizza 0 (cioè falso), poiché X non 

0 


è maggiore di Y 

Ok 



?X<>Y 


Il BASIC visualizza -1 (cioè vero), poiché X è 

-1 


diverso da Y 

Ok 



?SIN(X)- 0 


Il BASIC visualizza 0 (cioè falso), poiché 

0 


SIN(X) è positivo 

Ok 



?X MOD Y=1 


Il BASIC visualizza -1 (cioè vero), poiché X MOD 

-1 


Y è uguale ad 1 

Ok 



?"T0KY0"> "FRANKFURT" 


11 BASIC visualizza -1 (cioè vero), poiché TOKYO 

-1 


è maggiore di FRANKFURT (cioè segue FRANKFURT 

Ok 


nell'ordine alfabetico) 
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?"TOKYO" >"T0KY01 " 


Ok 


Il BASIC visualizza 0 (cioè falso), poiché TOKYO 
è inferiore a T0KY01. Quando due stringhe sono 
di diversa lunghezza e la più corta è identica 
alla prima parte di quella più lunga allora 
quest'ultima è considerata maggiore 


L'uso di Espressioni di Confronto 

11 risultato di una espressione di confronto può essere utilizzato per 
prendere una decisione a proposito di un flusso di programma. E' 
possibile usare le espressioni di confronto nell'ambito delle seguenti 
istruzioni di controllo: 

- 1F...GOTO...ELSE, oppure 

- 1F...THEN_ELSE, oppure 

- WH1LE 

dove viene controllata una condizione al fine di determinare le 
successive operazioni del programma (vedere il Capitolo 8). 

La condizione può consistere in una espressione numerica, di confronto o 
logica. 11 BASIC determina se la condizione (dopo IF oppure WHILE) è 
vera o falsa controllando il risultato dell'espressione per verificare 
se sia uguale a zero o meno. Un risultato diverso da zero è assunto come 
valido, mentre lo zero viene considerato falso. 

Ad esempio, la seguente istruzione: 

100 1F A$> B$ THEN 50 

trasferisce il controllo dell'esecuzione all'istruzione 50 se la 
condizione (A$>B$) è vera. Se invece la condizione è falsa (e cioè A$ 
non è maggiore di B$) viene eseguita l'istruzione successiva. 


ESPRESSIONI LOGICHE 


Un'espressione logica è formata da un operando preceduto dall'operatore 
logico NOT, oppure da due operandi separati da un altro operatore logico 
(AND, OR, XOR, EQV, e 1MP) o da due operandi separati da un operatore 
logico e da NOT. 
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Gli operandi in un’espressione logica possono essere espressioni 
numeriche o di confronto. Entrambe forniscono un risultato numerico. 

11 risultato di un'espressione logica è anch'esso numerico: è un valore 
intero con qualsiasi combinazione di bit nell'intervallo da -32768 a 
32767. 


Di seguito sono presentati alcuni esempi di espressioni logiche. 


NOT X 
X AND Y 
A=*B OR C>D 
1% AND A$< B$ 
A$ XOR B$ 


è valido 
è valido 
è valido 
è valido 

non è valido (poiché gli operandi sono stringhe). 


Operatori Logici 

Gli operatori logici convertono i loro operandi in stringhe di 16 bit, 
con segno, usando la rappresentazione intera complemento a due 
nell'intervallo da -32768 a +32767. Quando gli operandi si trovano fuori 
da questo intervallo si verificherà un errore. 

L'operazione data viene svolta su questi numeri interi dove ogni bit del 
risultato è determinato dai bit corrispondenti dei due operandi. 

Gli operatori logici sono elencati nella tabella qui di seguito, 
denominata "tabella di verità”. Descrive graficamente i risultati delle 
operazioni logiche su ogni bit degli operandi. Ogni possibile combina¬ 
zione di bit è inclusa nella tabella. 

Si noti che i due operatori XOR ed EQV sono l'uno l'esatto contrario 
dell'altro. 


A 

NOT A 

A 

B 

A AND B 

A OR B 

A XOR B 

A EQV B 

A 1MP B 

1 

0 

1 

1 

1 

1 

0 

1 

1 

0 

1 

1 

0 

0 

1 

1 

0 

0 



0 

1 

0 

1 

1 

0 

1 



0 

0 

0 

0 

0 

1 

1 


abella 6-1 Tabella di verità 


6-13 
















Livello di Priorità degli Operatori Logici 

Nello svolgimento di un'espressione vengono prima eseguite le operazioni 
numeriche e di confronto, e successivamente quelle logiche. 

La tabella che segue riporta gli operatori logici nell'ordine di priori¬ 
tà in cui essi vengono svolti dal linguaggio BASIC. 


OPERATORI 

LIVELLO DI PRIORITÀ' 

NOT 

IL PIU' ALTO 

AND 


OR 


XOR 


1MP 


EQV 

IL PIU' BASSO 


Tabella 6-2 Priorità degli Operatori Logici 


Esempi 

Consideriamo alcuni esempi. Prima di tutto assegneremo dei valori alle 
variabili X, Y e Z. 


VIDEO 


COMMENTI 

X%=0 


il BASIC esegue le assegnazioni 

Ok 


indicate 

Y%=3 



Ok 



Z%=5 



Ok 



?X% < Y% AND Z%=3 


il risultato è falso (0), poiché 

0 


X%<Y% è vero (-1) ma Z%=3 è 

Ok 


falso (0) 

?X% OR X%<Z% 


il risultato è vero (-1), poiché 

-1 


X% è falso (0) ma X%<Z% è vero 

Ok 


(-1) 
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ESPRESSIONI 


?63 AND 16 

16 

OK 

il risultato è 16, poiché 

63 = 111111 (in binario) 

16 = 010000 (in binario) 

010000 

?4 OR 2 

6 

il risultato è 6, poiché 

Ok 

4 = 100 (in binario) 

2 = 010 (in binario) 

110 

?-1 OR -2 

-1 

il risultato è -1, poiché 

Ok 

-1 = 1111111111111111 (in binario) 
-2 = 1111111111111110 (in binario) 
1111111111111111 

?0 < 2 AND 4=4 
-1 

il risultato è vero (-1), poiché 

Ok 

0< 2 è vero (-1 ), e 


4=4 è vero (-1) 

?0 XOR Y%=3 

il risultato è vero (-1), poiché 

Ok 

0 è falso (0), e 

Y%=3 è vero (-1) 

?Z%>Y% AND NOT "A"> "B" 

il risultato è vero (-1), poiché 

Ok 

Z%> Y% è vero (-1 ), e 
"A"> M B" è falso (0) 

Nota: E* possibile scrivere due 
operatori di seguito solo a con¬ 
dizione che il secondo sia un 
operatore NOT. 


Uso delle Espressioni Logiche 

Le espressioni logiche possono essere usate per: 

- controllare una condizione nelle seguenti istruzioni di controllo: 
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IF...GOTO...ELSE, 

1F. . .THEN...ELSE, 

WHILE 

Ad esempio, l'istruzione 

50 1F A$ > B$ AND B< =C THEN 300 

trasferirà il controllo dell'esecuzione all'istruzione 300 se la con¬ 
dizione (A$> B$ AND B<=C) è vera (cioè A$ maggiore di B$ e B minore o 
uguale di C). Se la condizione è falsa (cioè A$ minore di B$ o B 
maggiore di C) verrà eseguita l'istruzione successiva. 

- controllare parole (16 bit) per una particolare configurazione di bit. 
Ad esempio, l'operatore AND può essere usato per "mascherare" tutti i 
bit eccetto uno di una status word (parola di stato) associata a un 
buffer di 1/0. L'operatore OR può essere usato per fare il "merge" di 
due parole in modo da creare un determinato valore binario, ad 
esempio: 

-1 AND 8 è 8 
-1 OR 8 è -1 

poiché 

-1 = 1111111111111111 (in binario) 

8 = 0000000000001000 (in binario) 


LIV ELLO DI PRIO RI TÀ' DEGLI OPE R ATORI 

La seguente tabella elenca tutti gli operatori (numerici, stringa, di 
confronto e logici) nell'ordine di priorità con cui essi vengono 
eseguiti nel linguaggio BASIC. 


OPERATORI 

LIVELLO DI PRIORITÀ' 

A (elevamento a potenza) 

- (cambiamento di segno) 

* / (moltiplicazione e divisione) 

IL PIU' ALTO 
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ESPRESSIONI 


\ 

(divisione tra interi) 


MOD 

(divisione modulo) 


+ - 

(addizione e sottrazione) 


+ 

(concatenazione di stringa) 


Tutti gli 

operatori di confronto 


NOT 



AND 



OR 



XOR 



1MP 



EQV 


IL PIU' BASSO 

Tabella 6 

- 3 Priorità degli Operatori 


Note 

- gli operatori inclusi nella stessa linea hanno lo stesso livello di 
priorità 

- tutti gli operatori di confronto hanno lo stesso livello di priorità 

- l'ordine di svolgimento delle espressioni può essere modificato me¬ 
diante l'uso di parentesi. Ad esempio, l'ordine di svolgimento di: 

NOT A >B AND C>D OR E >F 

è diverso da quello di: 

NOT (A>B AND (C>D OR E>F)) 

se ad esempio, A> B è vero, C>D è falso ed E>F è vero, la prima 
espressione è vera, mentre la seconda è falsa. 

- il risultato di una qualsiasi espressione può anche essere un operando, 
così si possono formare espressioni molto complesse, ad esempio 
concatenando due o più espressioni logiche con un operatore logico 
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(come nell'esempio di sopra). Comunque, non è buona norma 
programmazione scrivere espressioni troppo complesse. 


di 
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7. COME VENGONO EMESSI I DATI IN BASIC 


SOMMARIO 


Abbiamo appena analizzato come introdurre dati nell'M20 e come elaborar¬ 
li. 

Questo capitolo si propone di illustrare come definire l'ampiezza della 
linea dello schermo e/o della stampante (comando W1DTH) e come ottenere 
i risultati elaborati dal computer. Esamineremo le istruzioni LPR1NT, 
PRINT, LPR1NT US1NG e PRINT US1NG. Esse consentono di stampare/visualiz¬ 
zare i dati in formato standard o in formato definito dall'utente. 


INDICE 

DEFINIZIONE DEL NUMERO DI 7-1 

NULL E DELL'AMPIEZZA DELLA 
LINEA Di' OUTPUT 

NULL (PROGRAMMA/1MMED1ATO) 7-1 

UIDTH (PROGRAMMA/IMMEDIATO) 7-2 

FOR MATO STANDARD 7-4 

LPR1NT/PR1NT (PROGRAMMA/ 7-4 

IMMEDIATO) 

WR1TE (PROGRAMMA/IMMEDIATO) 7-10 

FORMATO DEFINITO DALL’UTENTE 7-12 

LPRINT USING/PR1NT US1NG 7-12 

(PR0GRAMMA/1MMED1AT0) 
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DEFINIZIONE DEL NUMERO DI NULL E DELL'AMPIEZZA DELLA LINEA DI OUTPUT 

Le istruzioni NULL e W1DTH, che possono anche essere utilizzate in un 
programma, consentono di stabilire rispettivamente il numero di nuli 
stampati dopo ogni linea e l'ampiezza massima della linea del video e 
della stampante. 

Nuli è il primo carattere della tabella ASCII: non ha un equivalente 
grafico e corrisponde al codice decimale 0 (v. Appendice A). 


NULL (PR0GRAMMA/IMMED1AT0) 


Stabilisce il numero di nuli che devono essere stampati alla fine di 
ogni linea. 



Figura 7-1 Comando NULL 


Esempio 


SE l'utente imposta... 


ALLORA... 


NULL 2 HI 


alla fine di ogni linea 
stampati 2 nuli 


saranno 


Nota : L'espressione numerica viene 
arrotondata al numero intero più 
vicino. 


Nel caso di nastri perforati a 10 
caratteri per secondo, il valore 
dell'espressione dovrebbe essere 
>=3. Ciò consente anche di iden¬ 
tificare le linee sul nastro. 
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Il valore dovrebbe essere 0 oppure 

1 nel caso di telescriventi tele- 
type o CRT teletype compatibile. 
Il valore dovrebbe essere uguale a 

2 oppure a 3 per stampanti hard- 
copy da 30 caratteri per secondo. 


WIDTH (PROGRAMMA/IMMEDIATO) 


Definisce l'ampiezza massima della linea del video o della stampante, 
per gli output ottenuti usando le istruzioni PR1NT/WRITE, LPRINT, PR1NT 
US1NG e LPRINT USING o quando viene emesso un messaggio d'errore. 



Figura 7-2 Comando WIDTH 


Valore di Default 

Quando non si usa il comando WIDTH il sistema assume un'ampiezza di 
linea dello schermo di 64 caratteri. 

Allo stesso modo, se non si usa il comando WIDTH LPRINT, il sistema 
assume un'ampiezza di linea della stampante di 132 caratteri. 


Esempio 

10 PRINT "ABCDEFGHUKLMNOPQRSTUVWXYZ" 
RUN 

ABCDEFGHUKLMNOPQRSTUVWXYZ 

Ok 

WIDTH 18 

Ok 

RUN 

ABCDEFGHIJKLMNOPQR 

STUVWXYZ 

Ok 
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Caratteristiche 


SE... 


si omette l’opzione 
LPRINT 


si fa uso del co¬ 
mando LPRINT 


ALLORA. 


si definisce l'ampiezza della linea del video 


si definisce l'ampiezza della linea di stampa. 
Per esempio: 


10 W1DTH LPRINT 4 
20 LPRINT "AAAABBB8CC" 
RUN 
Ok 



il valore dell'espres¬ 
sione numerica non è 
un numero intero 


viene arrotondato all'intero più vicino e deve 
avere un valore compreso tra 15 e 255. 

Se il valore arrotondato è 255, l'ampiezza della 
linea è "infinita" e cioè il BASIC non esegue il 
ritorno a capo. Nondimeno la posizione del 
cursore e della testina stampante determinata 
dalle funzioni POS e LPOS ritorna a zero quando 
si supera la posizione 255. 


Se il valore arrotondato è maggiore di 255, vie¬ 
ne emesso un messaggio d'errore (Illegal func- 
tion cali) 
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FORMATO STANDARD 


Le istruzioni PR1NT, URITE e LPRINT consentono di visualizzare (PR1NT e 
URITE) oppure stampare (LPRINT) i risultati dei calcoli in un formato 
standard. Esse sono importanti istruzioni di programma, ma possono anche 
essere usate come istruzioni immediate. 

Se si desidera includere in una linea i risultati di due o più espres¬ 
sioni, queste ultime devono essere separate da una virgola (URITE), da 
una virgola o da un punto e virgola (PR1NT, LPRINT). 

Con l'istruzione URITE i dati visualizzati verranno separati, l'uno 
dall'altro, da una virgola, mentre le stringhe saranno delimitate da 
virgolette. Con le istruzioni PR1NT e LPRINT, l'uso della virgola 
"separa" i risultati (mediante l'introduzione di spazi), mentre il punto 
e virgola li "ravvicina" e le stringhe non saranno più delimitate da 
virgolette. 


LPR1NT/PR1NT (PR0GRAMMA/1MMED1AT0) 


Le istruzioni LPRINT e PR1NT consentono rispettivamente di stampare e 
visualizzare i dati secondo un formato standard. 

E' possibile usare un punto interrogativo (?) al posto dell'istruzione 
PR1NT. 



Figura 7-3 Istruzione LPRINT 
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Figura 7-4 Istruzione PRINT 

Caratteristiche 


SE... ALLORA... 


l'istruzione LPR1NT 
(oppure PRINT) non 
termina con una 
virgola o un punto 
e virgola 


quando l'istruzione viene eseguita, viene gene¬ 
rata una successiva linea di dati. 

Ad esempio: 

LIST 

10 PRINT 1 

20 PRINT 2 

Ok 

RUN 

1 

2 

Ok 

l'istruzione LPR1NT 
(oppure PRINT) non 
contiene alcuna e- 
spressione 


viene saltata una linea, consentendo in questo 
modo di generare spazi tra linee di dati. 

Ad esempio: 

LIST 

10 PRINT 1 

20 PRINT 

30 PRINT 2 






















le espressioni nella 
lista di output sono 
separate da una vir¬ 
gola 


la lista delle e- 
spressioni contiene 
molti dati 


01 

RUN 

1 

2 

Ok 


ogni valore viene stampato (o visualizzato) 
allineato a sinistra in una delle "zone” di 
stampa in cui ogni linea è divisa (ogni zona è 
composta da 14 posizioni). 

Ad esempio: 

LIST 

10 A$ = "Por June..." 

20 X = .353 

30 PRINT "Results", A$, X 

Ok 

RUN 

Results For June... .353 

Ok 

Nota : Ad ogni valore positivo (in questo caso 
.353) viene anteposto uno spazio (vedere in 
seguito). 

Si noti anche che il numero delle zone di stampa 
dipende dal numero massimo di caratteri che può 
contenere. Ciò può essere stabilito mediante il 
comando W1DTH o assunto per default. 

1 valori stringa visualizzati (o stampati con 
LPRINT) non sono delimitati da virgolette. 


possono essere generate due o più linee di dati. 
Ad esempio: 




U1DTH 31 
Ok 

PRINT 1, 1+2, 2+3, 7, 9, "ABCD" 

1 3 ^ 

5 7 

9 ABCO 
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un'istruzione LPR1NT 
(oppure PRINT) con¬ 
tiene una o più e- 
spressioni numeriche 


l'ultima espressione 
della lista è seguita 
da una virgola 


Nota : Ad ogni valore positivo viene anteposto 
uno spazio (vedere seguito) 

- ad ogni valore stampato o visualizzato viene 
aggiunto in coda uno spazio 

- ad ogni valore positivo è anteposto uno spazio 

- ad ogni valore negativo viene anteposto il 
segno meno 

- ogni valore in semplice precisione viene 
rappresentato in formato a virgola fissa se la 
rappresentazione in tale formato può avvenire 
con 6 oppure meno di 6 cifre con la stessa 
accuratezza del formato a virgola mobile (o 
esponenziale) 

- ogni valore in doppia precisione viene rappre¬ 
sentato in formato a virgola fissa se la 
rappresentazione in tale formato può avvenire 
con 15 oppure meno di 15 cifre con la stessa 
accuratezza del formato a virgola mobile (o 
esponenziale) 

Ad esempio: 

PR1NT 10A-6 
.000001 
Ok 

PR1NT 10A-7 
1 E—07 
Ok 

PRINT 10—15, 10-16 
.000000000000001 1D-16 

Ok 

Nota : il secondo valore viene visualizzato 
allineato a sinistra nella terza zona di stampa 
poiché il primo valore supera l'ampiezza della 
prima zona di stampa 

una successiva operazione di PRINT (LPR1NT) o 
INPUT visualizza o stampa il successivo caratte¬ 
re o cifra nella stessa linea (all'inizio della 
successiva zona di stampa), sempre che ci sia 
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l'ultima espressione 
della lista è seguita 
da un punto e virgola 


si inseriscono più 
virgole in successione 


spazio sufficiente; in caso contrario, esso sarà 
stampato o visualizzato nella linea successiva. 

Ad esempio: 

LIST 

10 A$ = "For July..." 

20 X = .491 

30 PRINT "Results", A$, 

40 PRINT X 

Ok 

RUN 

Results For July... .491 


una successiva operazione di PR1NT/LPR1NT o 
INPUT visualizza o stampa il successivo caratte¬ 
re o cifra nella stessa linea iniziando dalla 
posizione del cursore (o della testina di 
stampa) sempre che ci sia spazio sufficiente 
sulla linea. In caso contrario, esso sarà 
visualizzato/stampato nella linea successiva. 

Ad esempio: 

LIST 

10 INPUT X 

20 PRINT X "SQUARED 1S" X A 2 "AND"; 

30 PRINT X "CUBED 1S" X A 3 

40 PRINT 

50 GOTO 10 

Ok 

RUN 

? 9 

9 SQUARED 1S B1 AND 9 CUBED 1S 729 
? 21 

21 SQUARED 1S 441 AND 21 CUBED 1S 9261 


l'uso di ogni virgola fa sì che la testina di 
stampa o il cursore si posizioni all'inizio 
della successiva zona di stampa. 

L'uso delle virgole consente quindi di ottenere 
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si usano punti e 
virgola o spazi al 
posto delle virgole 
per separare le 
espressioni della 
lista 


una ampia spaziatura nella visualizzazione o 
stampa dei dati. 

Ad esempio: 

PR1NT "M",,”N" 

M N 

Ok 


la spaziatura dei valori visualizzati o stampati 
è più compatta. L'esatta spaziatura dipende 
dal numero di cifre o caratteri di ogni valore. 
L'uso di punti e virgola consente quindi di 
stampare o visualizzare un numero maggiore di 
valori in ogni linea. 

L'introduzione di più di uno spazio (o punto e 
virgola) tra due espressioni, avrà lo stesso 
effetto dell'introduzione di un solo spazio (o 
di un solo punto e virgola). 

Ad esempio: 

LIST 

10 Al = 1000 
20 A2 = 2000 
30 A3 = 3000 
40 A4 = 4000 
50 A5 = 5000 
60 A6 = 6000 
70 A7 = -7000 

80 PR1NT Al ;A2; A3 ; A4 ; ;A5 A6 A7 

Ok 

RUN 

1000 2000 3000 4000 5000 6000 -7000 

Gli spazi, che compaiono tra i numeri, sono 
dovuti al fatto che il sistema aggiunge uno 
spazio dopo ogni numero ed elimina il segno 
implicito "più" che precede ogni valore positi¬ 
vo, sostituendolo con uno spazio. 

-► 
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si introducono con¬ 
temporaneamente vir¬ 
gole e punti e vir¬ 
gola nella stessa 
istruzione LPR1NT 
(oppure PRINT) 


è possibile identificare ogni risultato e 
ottenere una spaziatura appropriata nell'ambito 
di una linea. 

Ad esempio: 


LIST 

10 INPUT "Base e Altezza": 
20 PRINT "Area=”;B*H,"Base: 
30 GOTO 10 
Ok 
RUN 


B,H 

!";B,"Altezza=";H 


Base e Altezza? 1.2,3 

Area= 3.6 8ase= 1.2 Altezza= 3 

Base e Altezza? A C 

Break in 10 


Ok 


si usa la funzione 
speciale di sistema 


TAB 


si determina l'esatta posizione sulla linea in 
cui si dovrà posizionare la testina di stampa (o 
il cursore) per iniziare la stampa o la 
visualizzazione dei dati. 


Ad esempio: 


PRINT 1 ; TAB(6); 2 
1 2 
Ok 


si usa la funzione 
speciale di sistema 
SPC 


viene inserito il numero specificato di spazi 
sulla linea. (Nel calcolare il numero di spazi 
desiderati, bisogna tener conto che i dati 
numerici sono sempre seguiti da uno spazio). 


Ad esempio: 


PRINT 1 ; SPC(6); 2 
1 2 
Ok 





URITE (PROGRAMMA/IMMEDIATO) 

Visualizza una lista di dati. Ogni elemento visualizzato è separato dal 
precedente da una virgola. Le stringhe sono delimitate da virgolette 
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("). Il BASIC esegue un ritorno a capo/interlinea dopo la visualizzazio¬ 
ne dell'ultimo dato. 



Figura 7-5 Istruzione URITE 


Dove 

1' espressione può essere numerica, di confronto, logica o stringa. Se 
non si indica una espressione, l'istruzione URITE esegue una interlinea. 


Esempio 


VIDEO 


COMMENTI 


10 A=80 : B=90 
20 C$="THAT'S ALL" 

30 URITE A,B,C$ 

RUN 

80, 90, "THAT’S ALL" 
Ok 


quando si esegue un'istruzione 
URITE ogni dato è separato da 
quello precedente da una virgola, 
e le stringhe sono racchiuse tra 
virgolette. 


Nota : L'istruzione URITE visualiz¬ 
za valori numerici usando lo 
stesso formato dell'istruzione 
PR1NT, ma tali valori non saranno 
seguiti da spazi. 
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FORMATO DEFINITO DALL’UTENTE 


Come abbiamo già visto, l'uso di virgole, punti e virgola, stringhe tra 
virgolette e delle funzioni SPC e TAB consente un controllo limitato del 
formato dei dati stampati o visualizzati. Le istruzioni LPR1NT US1NG e 
PR1NT US1NG consentono invece di avere un completo controllo del formato 
dei dati stampati o visualizzati. 

Generalmente tali istruzioni sono utilizzate in un programma ma possono 
anche essere usate come istruzioni immediate. 


LPR1NT US1NG/PRINT USING (PROGRAMMA/IFMED1ATO) 

Le istruzioni LPR1NT USING e PR1NT USING consentono rispettivamente di 
stampare e di visualizzare una lista di dati secondo un formato definito 
dall'utente. 

Le espressioni che compaiono in queste istruzioni possono essere sepa¬ 
rate da una virgola (,) o da un punto e virgola (;). Non è rilevante se 
si usa la virgola o il punto e virgola come separatore. 1 valori saranno 
stampati o visualizzati secondo il formato specificato dall'espressione 
stringa che compare dopo USING. Questa espressione può essere una 
costante o una variabile stringa contenente speciali caratteri di 
formattazione. Tali caratteri determinano il campo ed il formato delle 
stringhe o dei numeri stampati o visualizzati. 



Figura 7-6 Istruzione LPR1NT USING 
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Figura 7-7 Istruzione PR1NT USING 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

string expression 

stringa di caratteri di formattazione (vedere in 
seguito) o variabile stringa, comprendente una 
stringa di caratteri di formattazione 

expression 

espressione numerica, di confronto, logica o 
stringa che deve essere stampata o visualizzata 

Visualizzazione o stampa di stringhe 

E 1 possibile usare uno dei tre seguenti caratteri di formato: 

CARATTERE DI 

FORMATO 

SIGNIFICATO 

H|«' 

Specifica che solo il primo carattere di una 
stringa deve essere stampato o visualizzato. 

Ad esempio: 

LIST 

10 A$="UATCH" 

20 B$="0UT" 
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"\n spazi\” 


30 PRINT USING "!";A$;B$ 

Ok 

RUN 

WO 

Ok 

specifica che i primi 2+n caratteri della 
stringa devono essere stampati o visualizzati. 
Se le barre rovesce non contengono spazi, 
verranno stampati o visualizzati due caratteri. 
Se contengono uno spazio, i caratteri stampati 
(visualizzati) saranno tre, e così via. Se la 
stringa è più lunga del campo, i caratteri 
eccedenti saranno ignorati. Se invece il campo è 
più lungo della stringa, la stampa (visualizza¬ 
zione) della stringa inizierà dalla sinistra e 
sarà completata con spazi sulla destra. 

Ad esempio: 

LIST 

10 A$="L00K" 

20 B$="0UT" 

30 PRINT USING "\ V;A$;B$ 

40 PRINT USING "\ \";A$;B$ 

Ok 

RUN 

LOOKOUT 
LOOK OUT 


specifica un campo stringa a lunghezza varia¬ 
bile. Quando il campo viene specificato con "8" 
la stringa verrà stampata esattamente come essa 
viene introdotta. 

Ad esempio: 

LIST 

10 A$="L00K":B$="0UT" 

20 PRINT USING "!";A$; 

30 PRINT USING "8";B$ 

Ok 

RUN 

LOUT 

Ok 
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Visualizzazione e Stampa di Numeri 

E' possibile usare i seguenti caratteri di formato: 




CARATTERE DI 
FORMATO 


SIGNIFICATO 


# 


un simbolo di numero ("number sign") viene usato 
per rappresentare la posizione di ogni cifra. Le 
posizioni di cifra sono sempre sostituite da 
cifre o da spazi. Se le cifre che devono essere 
stampate/visualizzate sono inferiori al numero 
delle oosizioni specificate, il numero sarà 
allineato a destra e sarà preceduto da spazi. 


Ad esempio: 

PR1NT US1NG (£> 

99 
Ok 


è possibile inserire un punto decimale in ogni 
posizione del campo. Se la stringa di formato 
indica che una cifra precede il punto decimale, 
tale cifra sarà stampata/visualizzata solo se 
divèrsa da zero. Quando risulti necessario, i 
numeri sono arrotondati. 

Ad esempio: 

PR1NT US1NG "#*#.##";.78 I£1 
.78 
Ok 

PR1NT US1NG "###.##";987.654 BEI 

987.65 

Ok 

PR1NT US1NG "##.## ";10.,5.3,66.789,.234 

10.00 5.30 66.79 .23 

Ok 

Nell'ultimo esempio, alla fine della stringa di 
formato sono stati inseriti tre spazi per 
separare i valori visualizzati nella linea. 

- ► 
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+ Un segno più all'inizio o alla fine della 

stringa di formato farà sì che il segno del 
numero (più o meno) venga visualizzato/stampato 
prima o dopo il numero. 

Ad esempio: 

PR1NT US1NG "+##.## ";-68.95, 2 .4,55.6,-.9 03 

-68.95 +2.40 +55.60 -.90 

Ok 

Nota : Per la sola visualizzazione del sogno meno 
(e non del segno più), all'inizio del numero si 
dovrà iniziare la stringa di formattazione 
inserendo un simbolo di numero (#) in più. 

Ad esempio: 

PR1NT US1NG "UHM" ;-68.95,60.95 03 
-68.95 68.95 


un segno meno alla fine del campo di formato 
farà sì che i numeri negativi stampati/visua¬ 
lizzati siano seguiti dal se-no meno. 

Ad esempio: 

PR1NT USI MG "##.##- -68.95,22.449,-7.01 03 

60.95- 22.45 7.01- 

Ok 


un doppio asterisco all'inizio della stringa di 
formato fa sì che gli spazi iniziali di un campo 
numerico siano occupati da asterischi. 11 
simbolo ** indica anche due ulteriori posizioni 
di cifra. 

Ad esempio: 

PR1NT USUIG "**#.# “;12.39,-0.9,765.1 03 

*12.4 **-.9 765.1 

Ok 
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COME VENGONO EMESSI I DATI IN BASIC 


$$ Un doppio segno di dollaro fa sì che un segno di 

dollaro compaia alla immediata sinistra del 
numero formattato. 11 segno $$ specifica due 
ulteriori posizioni di cifra, una delle quali è 
occupata dal segno di $. 11 carattere $$ non può 
essere usato con il formato esponenziale(A A AA) o 
con numeri negativi a meno che l'ultimo caratte¬ 
re della stringa di formato sia un segno meno 
(appare il segno del numero sulla destra se 
negativo) o un segno più (appare sempre il segno 
del numero sulla destra). 

Ad esempio: 

PR1NT US1NG "$$»#».»#-";-456.78 HI 
$456.78- 
Ok 


**$ il segno **$ situato all'inizio di una stringa 

di formato combina gli effetti dei due simboli 
appena descritti. Gli spazi iniziali saranno 
occupati da asterischi, ed un segno di $ verrà 
inserito immediatamente prima del numero. 

Il simbolo **$ specifica tre ulteriori posizioni 
di cifra. 




Ad esempio: 

PR1NT US1NG "**$##.#» ";2.34 

***$2.34 

Ok 

una virgola collocata alla sinistra del punto 
decimale in una stringa di formato fa sì che una 
virgola venga visualizzata/stampata alla sini¬ 
stra di ogni terza cifra nell'ambito della parte 
intera del numero. Una virgola situata alla fine 
della stringa di formato viene visualizza¬ 
ta/stampata come parte della stringa. 11 simbolo 
della virgola mette a disposizione un'altra 
posizione di cifra. L'inserimento della virgola 
non esercita alcun effetto nell'ambito di un 
formato esponenziale (AAAA). 

Ad esempio: 
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PR1NT US1NG " »###,.## ";1234.5 

1,234.50 

Ok 

PRINT USING "Unnn.ttH, ";1234.5 I£I 

1234.50, 

Ok 

AAA A 


il formato esponenziale può essere specificato 
inserendo quattro simboli dell'esponente dopo i 
caratteri che specificano la posizione delle 
cifre. Tali simboli permettono di generare lo 
spazio per la visualizzazione/stampa di E+xx. E' 
possibile specificare qualsiasi posizione del 
punto decimale. 

Le cifre significative sono allineate a sinistra 
e l'esponente viene modificato in consequenza. A 
meno che venga specificato un segno iniziale di 
+ oppure un segno finale di + oppure di -,una 
posizione di cifra verrà utilizzata alla sini¬ 
stra del punto decimale per stampare/visualizza¬ 
re uno spazio oppure un segno meno. 

Ad esempio: 

PRINT USING "##.MAAAA";234.56 

2.35E+02 

Ok 

PRINT USING ".####AAAA";888888 HI 
.8889E+06 

Ok 

PRINT USING "+ .Utttttt A AAA " ; 123 
+.1230E+03 

Ok 



un segno di sottolineatura incluso nella stringa 
di formato fa sì che il successivo carattere sia 
visualizzato/stampato così come appare nella 
stringa di formato. 

Ad esempio: 

PRINT USING " !»».#» !";12.34 «:■ 

! 12.34 ! 

Ok 
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COME VENGONO EMESSI I DATI IN BASIC 


/O 



Il carattere visualizzato/stampato così come 
appare nella stringa di formato può consistere 
nello stesso segno di sottolineatura quando si 
include " " nella stringa di formato. 

% 

se il numero che deve essere stampato/visualiz¬ 
zato è maggiore del campo numerico specificato, 
il segno di percentuale comparirà di fronte al 
numero. Se l'arrotondamento fa sì che il numero 
superi il campo, di fronte ad esso comparirà il 
segno di percentuale. 


Ad esempio: 


PR1NT US1NG " ## . “;111 .22 K&l 

%111.22 

Ok 


PR1NT USING .999 IH 

VI .00 

Ok 


Se il numero delle cifre specificate è superiore 
a 24, si avrà il messaggio d'errore "Illegal 
Function Cali". 
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Nota 


Se in un programma si usa più volte la stessa stringa di formato, 
sarà opportuno assegnare una varibile stringa dei caratteri di format¬ 
tazione e quindi specificare il nome della variabile stringa al 
posto della stringa di formato. 

Per esempio: 

10 A$=‘ . " 

20 PR1NT US1NG A$; 8.49 


100 PRINT USING A$;A,B,C 


150 PRINT USING A$;Al,B1 


RUN 

8.49 

0.00 0.00 0.00 
0.00 0.00 
Ok 
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8. ISTRUZIONI DI CONTROLLO 



SOMMARIO 


Di norma le istruzioni BASIC sono eseguite l'una dopo l'altra nell'or¬ 
dine del numero di linea. A volte però può essere necessario alterare la 
normale sequenza di esecuzione mediante "salti" (branches) che trasferi¬ 
scono il controllo da un'istruzione ad un'altra parte del programma. 

In questo capitolo vedremo come sia possibile conseguire questo 
risultato tramite salti condizionati o incondizionati e tramite cicli 
(loops). 


INDICE 


SALTI (TRASFERIMENTI) 
INCONDIZIONATI ‘ 


8-1 


GOTO (PROGRAMMA/IMMEDIATO) 8-1 


ON...GOTO (PR0GRAMMA/1MME- 8-3 
D1AT0) 


SALTI (TRASFERIMENTI) 

condizionati’"' 


8-4 


IF...GOTO...ELSE/ 

IF...THEN_ELSE 

(PROGRAMMA/IMMEDIATO) 


8-4 


CICLI ITERATIVI (LOOPS) 


8-9 


FOR/NEXT (PROGRAMMA/IMME- 8-12 
DIATO) 


WH1LE/WEND (PROGRAMMA/IMME- 8-21 
DIATO) 









ISTRUZIONI DI CONTROLLO 


SALTI (TRASFERIMENTI) INCONDIZIONATI 


I trasferimenti di controllo possono essere condizionati o incon¬ 
dizionati. L'istruzione GOTO determina un trasferimento incondizionato 
del controllo dell'esecuzione al numero di linea indicato nell'istruzio¬ 
ne stessa. Il programma esemplificativo RETTANGOLO! (vedere capitolo 1 e 
2) contiene la seguente istruzione: 

80 GOTO 20 

L'istruzione indica all'M20 che la prossima istruzione che deve essere 
eseguita è la 20 al posto di quella immediatamente successiva di numero 
più elevato. 

L'istruzione 0N...G0T0, o istruzione calcolata GOTO, rappresenta 
un'altra forma di trasferimento incondizionato. Essa consente di 
trasferire il controllo ad una istruzione scelta tra n specificate in 
base al valore di una espressione numerica. Ad esempio: 

100 ON A GOTO 15, 30, 500 

Questa istruzione indica: se A=1 il controllo è trasferito all'istru¬ 
zione 15, se A=2 all’istruzione 30, se A=3 all’istruzione 500. Se però 
A<1 oppure A>3 il programma BASIC continua con la prossima istruzione 
eseguibile. 


GOTO (PROGRAMMA/IMMEDIATO) 


Trasferisce il controllo dell'esecuzione alla linea di programma 
specificata. 



Figura 8-1 Istruzione GOTO 
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Esempio: 


VIDEO 


LIST 

10 READ R 
20 PRINT "R =";R, 

30 A = 3.14*R A 2 
40 PRINT "AREA =";A 
50 GOTO 10 
60 DATA 5,7,12 
Ok 
RUN 

R = 5 AREA = 

R = 7 AREA = 

R = 12 AREA = 

Out of data in 10 


COMMENTI 


L'istruzione 50 trasferisce il 
controllo incondizionato all'i¬ 
struzione 10 


78.5 

153.86 

452.16 


Ok 


Caratteristiche 


SE. 


ALLORA... 


l'utente imposta: 


GOTO viene usato in alternativa a 


RUN. 


GOTO 500 


in Stato Comandi 
E 

500 è un'istruzione del 
programma residente in 
memoria 


l'istruzione specifi¬ 
cata tramite GOTO 
non è eseguibile (ad 
es. è una istruzione 
REM) 


Nota : l'uso dell'istruzione GOTO 
in Stato Comandi fa si che l'ese¬ 
cuzione del programma inizi al 
numero di linea specificato senza 
che venga automaticamente operato 
un CLEAR. Ciò consente di asse¬ 
gnare valori a variabili di pro¬ 
gramma quando si è in Stato 
Comandi. Questa tecnica può essere 
usata in fase di messa a punto 
(debug) del programma. 

il controllo viene trasferito alla 
prima istruzione eseguibile suc¬ 
cessiva 


► 
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ISTRUZIONI DI CONTROLLO 


un'istruzione GOTO si 

il valore della 

variabile di 

trova in un ciclo 

controllo (vedere 

FOR/NEXT) è 

(loop) FOR/NEXT 

l'ultimo valore assunto nell'ambi- 

E 

to del ciclo. 


trasferisce il control¬ 
lo ad un'istruzione 
esterna al ciclo 




ON...GOTO (PROGRAMMA/IMMED1ATO) 


Trasferisce il controllo dell'esecuzione di un programma ad una linea 
scelta tra un insieme di linee specificate dopo GOTO, in funzione del 
valore assunto da un'espressione specificata dopo ON. 




line 




number 


L_q. 


Figura 8-2 Istruzione ON...GOTO 

Caratteristiche 


SE... 


ALLORA... 


il programma ha la 
seguente struttura: 

20 INPUT A 

-r-r 30 ON A GOTO 100,200.300 
40 

A=1 

I 90 


il valore di A determina a quale 
dei numeri inclusi nella lista 
verrà trasferito il controllo. Se 
ad esempio il valore è uguale a 
tre, il controllo verrà trasferito 
al terzo numero di linea incluso 
nella lista (se il valore di A non 
è un intero, esso verrà arrotonda¬ 
to al valore intero più vicino). 


► 
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U-100 


TL 


200 


A=3 


►300 


il valore dell'espres¬ 
sione che segue ON è 
uguale a 0 o maggiore 
dei numeri inclusi 
nella lista (ma in¬ 
feriore o uguale a 255) 


il valore dell'espres¬ 
sione che segue ON è 
negativo o superiore a 255 


il controllo viene trasferito alla 
prima istruzione eseguibile suc¬ 
cessiva 


si ha il messaggio d'errore "Ille- 
gal Function Cali" (Richiamo non 
Lecito di Funzione) 


SALTI (TRASFERIMENTI ) C ONDIZIONATI 

In alcuni casi si può desiderare di effettuare il trasferimento del 
controllo dell'esecuzione di un programma a parti diverse dello stesso 
programma a seconda che si verifichino condizioni predefinite. Le 
istruzioni IF...GOTO...ELSE e/o IF...THEN...ELSE possono essere utiliz¬ 
zate per verificare tali condizioni e per decidere come effettuare il 
trasferimento. 


IF...GOTO...ELSE/1F...THEN...ELSE (PROGRAMMA/IMMEDIATO) 


Entrambe le istruzioni effettuano il trasferimento condizionato ad una 
istruzione specificata. 

Come è possibile notare attraverso la sintassi, l'istruzione IF... 
THEN...ELSE è la più potente, poiché consente di introdurre una serie di 
istruzioni sia dopo THEN che dopo ELSE. 
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ISTRUZIONI DI CONTROLLO 



Figura 8-3 Istruzione 1F...GOTO...ELSE 



Figura 8-4 Istruzione 1F...THEN...ELSE 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

condition 

può essere una espressione: 


- numerica 


- di confronto 


- logica 


Nota: Il BASIC determina se la condizione è vera 
o falsa controllando se il suo risultato 
(numerico) é diverso da zero (condizione vera) o 
uguale a zero (condizione falsa). Per questo 
motivo è possibile verificare se il valore di 
una variabile è uguale a zero o diverso da zero. 


► 
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specificando semplicemente il nome della varia¬ 
bile come "condizione". 

E 1 possibile inserire una virgola prima del THEN. 


Caratteristiche 


SE... 

ALLORA... 

la condizione è vera 

il controllo viene trasferito 

0 

all'istruzione il cui numero di linea viene 
specificato dopo GOTO (o THEN) 

OPPURE 

alla prima istruzione specificata dopo THEN 

la condizione è falsa 

E SE 

viene omessa la clau¬ 
sola ELSE 

il controllo viene trasferito alla prossima 
istruzione eseguibile che segue l'istruzione 
IF...G0T0 oppure 1F...THEN 

la condizione è falsa 

E SE 

la clausola ELSE è 
presente 

il controllo viene trasferito 

0 

all'istruzione il cui numero di linea viene 
specificato dopo ELSE 

OPPURE 

alla prima istruzione specificata che segue 
ELSE. 


Nota: Dopo aver eseguito l'istruzione (o le 
istruzioni) che fanno seguito ad ELSE, il 
controllo viene trasferito alla prossima istru¬ 
zione eseguibile 
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ISTRUZIONI DI CONTROLLO 


Eseapi 


VIDEO 


COMMENTI 

LIST 

10 REM IF GOTO test program 

20 INPUT 

30 1F X% > =10 GOTO 60 

40 PR1NT "1F GOTO failed thè test" 

50 GOTO 99 

60 PRINT "1F GOTO passed thè test" 

99 GOTO 20 

Ok 

RUN 
? 10 

1F GOTO passed thè test 
? 2 

1F GOTO failed thè test 

? A c 

Break in 20 

Ok 


se si introduce 10 la condizione 
dell'istruzione 30 (X%>=10) è vera 
e quindi il controllo viene tra¬ 
sferito all’istruzione 60. Se si 
introduce 2 la condizione è falsa 
e quindi il controllo viene tra¬ 
sferito all'istruzione 40 

LIST 

10 INPUT X 

20 1F X=1NT(X) 

THEN PRINT X; "is an integer" 

ELSE PRINT X; "is not an integer” 
30 IF X=9999 THEN END ELSE 10 

Ok 

RUN 
? 1 

1 is an integer 
? 1.5 

1.5 is not an integer 
? A C 

Break in 10 

Ok 


se si introduce 1, la condizione 
(X=1NT(X)) indicata nell'istruzio¬ 
ne 20, è vera e quindi il control¬ 
lo viene trasferito all'istruzione 
PRINT che segue THEN. Se invece si 
introduce 1.5 la condizione è 
falsa ed il controllo è trasferito 
all’istruzione PRINT che segue 
ELSE. 

Nota: l'istruzione 20 è una sola 
linea logica divisa in tre linee 
fisiche. 

50 IF 1 THEN A=1000 


il valore 1000 viene assegnato 
alla variabile A se 1 non è uguale 
a zero 

1 
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70 1F (I< 30) AND (I>5) THEN 
A=8+C: GOTO 350 
80 PRINT "OUT OF RANGE" 


si controlla se il valore di 1 è 
maggiore di 5 e minore di 30. Se I 
si colloca in quest'ambito, si 
calcola il valore della variabile 
A ed il controllo viene poi 
trasferito all'istruzione 350. In 
caso contrario, l'esecuzione con¬ 
tinua con la linea 80 


Istruzioni 1F Nidificate (Nested) 

Le istruzioni IF...GOTO...ELSE oppure 1F...THEN...ELSE possono essere 
nidificate. Tale processo trova un limite solo nella lunghezza di una 
linea BASIC (255 caratteri). Ad esempio: 


SE. .. 

ALLORA... 

si digita: 

1F X >Y THEN PRINT "GREATER" 

ELSE IF Y>X THEN PRINT "LESS THAN" 
ELSE PRINT "EQUAL" EJ 

la linea introdotta è una istru¬ 
zione lecita (in questo caso è una 
sola linea logica divisa in tre 
linee fisiche) 

l'istruzione non contiene 
numero di clausole ELSE e 

lo stesso 
THEN 

ogni ELSE viene associato con il 
più prossimo THEN non ancora 
associato a una clausola ELSE. Ad 
esempio: 



100 IF A=B THEN IF B=C THEN 

PRINT "A=C" 

ELSE PRINT "AoC" 

110... 



Verrà visualizzato A=C quando A=B 
e B=C; verrà vizzualizato AoC 
quando A=B ma B diverso da C. 

Se A diverso da B si passa 
all ' istruzione 110. 


8-8 


LINGUAGGIO BASIC - MANUALE GENERALE 














ISTRUZIONI DI CONTROLLO 


Controllo di un Valore Espresso in Virgola Mobile 


SE... 


si utilizza un'istruzione 

1F...GOTO_ELSE, oppure 

1F...THEN...ELSE per con¬ 
trollare il risultato di un 
calcolo in virgola mobile 


ALLORA... 


poiché la rappresentazione interna 
del valore non può essere esatta, 
il controllo viene effettuato 
nell’ambito del grado di accura¬ 
tezza definito. 

Per controllare ad esempio se la 
variabile A è uguale a 1.0 si 
utilizzerà: 

1F ABS(A-1.0)<1.0E-6 GOTO... 
oppure 

1F ABS(A—1.0)<1.0E-6 THEN... 


Questo controllo risulterà vero se 
il valore di A è uguale ad 1.0 con 
un errore relativo inferiore a 


1.0E-6 


CICLI ITERATIVI (LOOPS) 

L'esecuzione ripetuta di una serie di istruzioni viene definita con il 

termine di loop (ciclo iterativo). 

Ciò può essere ottenuto mediante le istruzioni: 

- FOR e NEXT, che possono essere usate per racchiudere una serie di 
istruzioni, consentendo di ripeterle un numero specificato di volte 

- WH1LE e WEND, che possono essere usate per racchiudere una serie di 
istruzioni, consentendo di ripeterle finché una determinata condizione 
risulta vera. 
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Come un Loop può Semplificare il Vostro Problema 

Si supponga di voler visualizzare una lista dei numeri da 1 a 25 
contemporaneamente alla loro radice quadrata. Ciò può essere ottenuto 
con gradi di efficienza via via maggiori. 

11 metodo più primitivo è quello di introdurre le seguenti istruzioni: 

10 PRINT 1,SQR(1) 

20 PRINT 2,SQR(2) 

30 PRINT 3,SQR(3) 


e così via, per terminare con: 

240 PRINT 24,SQR(24) 

250 PRINT 25,SQR(25) 

260 END 

Una soluzione migliore può essere ottenuta mediante l'uso dell'istru¬ 
zione IF...THEN 

10 LET A=1 
20 PRINT A,SQR(A) 

30 LET A=A+1 

40 1F A <26 THEN 20 

50 END 

E' possibile semplificare ulteriormente il processo usando il loop 
FOR/NEXT 

10 FOR A=1 TO 25 
20 PRINT A,SQR(A) 

30 NEXT A 
40 END 

Quest'ultima semplificazione può sembrare a prima vista di scarso rilie¬ 
vo. Nondimeno le utilizzazioni di questo loop sono sorprendenti così 
come potrà risultare dall'esame di alcune possibilità del suo impiego 
che verranno presentate in seguito. 
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ISTRUZIONI DI CONTROLLO 


L'inizio del Loop - L'istruzione FOR 

Le istruzioni FOR e NEXT identificano rispettivamente l'inizio e la fine 
di un loop. FOR specifica quante volte il loop, e cioè l’istruzione o la 
sequenza delle istruzioni comprese tra FOR e NEXT devono essere 
eseguite. 

Nell'esempio precedente FOR specifica che l'istruzione PR1NT deve essere 
eseguita per valori successivi di A compresi tra 1 e 25 (il valore di A 
viene incrementato di 1 dopo l'esecuzione di ogni PR1NT). Quando il 
valore di A supera 25, l'esecuzione del loop termina, ed il controllo 
passa alla prima istruzione successiva all'istruzione NEXT. In questo 
caso si tratta dell'istruzione END, che sta ad indicare il completamento 
del programma. 

L'indicazione A=1 TO 25 definisce l'insieme dei valori presi in consi¬ 
derazione per eseguire il loop. In questo contesto A è denominata 
variabile di controllo, poiché controlla quante volte il loop deve 
essere eseguito. La variabile di controllo subisce sempre incrementi 
pari ad 1, a meno che l'istruzione FOR non specifichi diversamente. E' 
possibile difatti incrementare la variabile di controllo di un valore 
diverso da 1. Ciò si ottiene aggiungendo la clausola STEP. 

Ad esempio: 

10 FOR A=1 TO 25 STEP 2 

Questa istruzione indica che la variabile di controllo subirà un 
incremento (o step) di 2. 11 loop verrà quindi eseguito per ogni valore 
dispari di A compreso tra 1 e 25 (e cioè 1,3,5...25). Quando il valore 
di A supera 25 (e cioè quando raggiunge 27) l'esecuzione del loop 
termina. Il valore di A sarà quindi 27 prima che venga eseguita 
l'istruzione che segue l'istruzione NEXT. 

Se si desidera invece eseguire il loop per i valori pari di A compresi 
tra 1 e 25, ciò può essere ottenuto specificando: 

10 FOR A=2 TO 25 STEP 2 

Anche in questo caso quando il valore di A supera 25 (cioè raggiunge 26) 
l'esecuzione del loop termina. 

E' possibile esplicitare, anche se non è necessario, un valore dell'in¬ 
cremento pari a 1. Ad esempio: 

80 FOR X=1 TO 40 STEP 1 
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Come nel caso delle espressioni contenute nelle istruzioni LET e PR1NT i 
parametri dell'istruzione FOR possono essere molto complessi. Ognuna 
delle seguenti istruzioni, ad esempio, è valida: 

70 FOR A=B TO C 

80 FOR X=8/M+N TO AA2 

50 FOR I=SQR(A) TO 1550 STEP B*C+6 

Se il valore di un incremento è negativo, il ciclo FOR/NEXT è eseguito 
finché il valore della variabile di controllo non è minore del valore 
finale (cioè il valore espresso dopo la parola TO). 

Ad esempio: 

LIST 

10 FOR K%=1 TO -10 STEP -1 
20 PR1NT K%; 

30 NEXT K% 

Ok 

RUN 

10-1-2 -3 -4 -5 -6 -7 -8 -9 -10 

In questo caso il ciclo viene ripetuto 12 volte. 


11 Termine del Ciclo Iterativo - L'istruzione NEXT 

Così come il loop inizia sempre con un'istruzione FOR, esso termina 
sempre con un'istruzione NEXT. Si ricordi che tale ciclo comprende tutte 
le istruzioni incluse tra le istruzioni FOR e NEXT. 

L'istruzione NEXT inizia con la parola chiave NEXT, alla quale può 
seguire una lista di nomi di variabili di controllo. Ogni variabile di 
controllo nell'istruzione NEXT deve avere lo stesso nome della variabile 
di controllo della corrispondente istruzione FOR. Più istruzioni FOR 
possono essere associate a una sola NEXT (si veda in seguito Nested 
Loops (Cicli Nidificati)). 


FOR/NEXT (PROGRAMMA/IMMEDIATO) 


Le istruzioni FOR/NEXT consentono di eseguire in loop una serie di 
istruzioni per un certo numero di volte. 
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ISTRUZIONI DI CONTROLLLO 



Figura 8-5 Istruzione FOR 



Figura 8-6 Istruzione NEXT 


Dove: 


ELEhcNTO DI SINTASSI 


control variable 


SIGNIFICATO 

consiste in una variabi¬ 
le semplice numerica 
(intera o in semplice 
precisione). 1 nomi del¬ 
le variabili di control¬ 
lo (control variable) 
specificati nelle istru¬ 
zioni NEXT e FOR devono 
essere uguali. Alla pa¬ 
rola NEXT può seguire 
una lista di variabili 
di controllo (vedere 
Nested Loops) ma è anche 
possibile scrivere un'i¬ 
struzione NEXT costi¬ 
tuita da questa sola 
parola. 


VALORI DI DEFAULT 

se alla parola NEXT 
non segue alcuna va¬ 
riabile di controllo, 
l'istruzione NEXT ver¬ 
rà messa in corrispon¬ 
denza con l'istruzione 
FOR eseguita per ulti¬ 
ma 
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initial value 

consiste in un'espres¬ 
sione numerica che spe 
cifica il primo valore 
(cioè il valore inizia¬ 
le) assegnato alla va¬ 
riabile di controllo 
quando si esegue una i- 
struzione FOR 


final value 

consiste in un'espres- 



sione numerica che spe¬ 
cifica il valore limite 
della variabile di con¬ 
trollo. Detto valore 
viene confrontato con la 
variabile di controllo 
ogni volta che il ci¬ 
clo viene ripetuto 


increnent 

consiste in un'espres- 

se non viene specifi- 


sione numerica che 

cata l'opzione STEP si 


specifica l'incremento 

assume un incremento 


cioè il valore che 
deve essere aggiunto 
(col suo segno al¬ 
gebrico) alla varia¬ 
bile di controllo ogni 
volta che l'istruzione 
NEXT viene eseguita 

di +1. 
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ISTRUZIONI DI CONTROLLO 


Funzionamento delle Istruzioni FOR/NEXT 



©— 


il loop viene 

eseguito 

indefinitamente 


(*> 


(*) A meno che il valore iniziale e finale coincidano. In tal caso viene 
eseguita la prima istruzione dopo la NEXT 

Figura 8-7 Istruzioni FOR/NEXT 
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Nota 


Un ciclo FOR/NEXT può essere definito "pendente" (pending) se interotto 
da un "break" prima della sua conclusione. Qualsiasi modifica al 
programma residente (come ad esempio: cancellazione e modifica di linee 
e così via) impedirà la conclusione del ciclo. 


Incremento di Valore Positivo 


il 

è 


SE. 


ALLORA... 


valore dell'incremento 
positivo 


il ciclo FOR/NEXT viene eseguito 
finché il valore della variabile 
di controllo non è maggiore del 
valore finale. 


Ad esempio: 


LIST 
10 K=10 

20 FOR 1=1 TO 10 STEP 2 
30 PR1NT 1; 

40 K=K+10 
50 PRINT K 
60 NEXT 
Ok 
RUN 


1 20 
3 30 

5 40 
7 50 
9 60 
Ok 


In questo caso il ciclo è ripetuto 
cinque volte 


► 
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ISTRUZIONI DI CONTROLLO 


il valore dell'incremento 
è positivo 

E SE 

il valore iniziale è supe¬ 
riore a quello finale 


il ciclo non viene eseguito. 
Ad esempio: 

LIST 
10 J=0 

20 FOR 1=1 TO J 
30 PR1NT 1 
40 NEXT 1 

50 PR1NT "Exit of thè loop" 

Ok 

RUN 

Exit of thè loop 
Ok 


Incremento di Valore Negativo 


SE... 


il valore dell'incremento 
negativo 


ALLORA... 


è il ciclo viene eseguito finché il 

valore della variabile di control¬ 
lo non è minore del valore finale. 


Ad esempio: 


LIST 

10 FOR 1%=1 TO -10 STEP -3 
20 PR1NT 1%; 

30 NEXT 1% 

40 PR1NT 
50 PR1NT "Exit 

"CONTROL VAR1ABLE=";1% 
Ok 
RUN 


1 -2 -5 -8 

Exit CONTROL VAR1ABLE=-11 

In questo caso il ciclo è eseguito 
quattro volte. Quando termina, la 
variabile di controllo mantiene 
l'ultimo valore assunto (-11) che 
viene visualizzato mediante l'i¬ 
struzione 50 
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il valore dell'incremento è 
negativo 

E SE 

il valore iniziale è minore 
di quello finale 

il ciclo non viene eseguito. 

Ad esempio: 

LIST 

10 FOR K%=1 TO 10 STEP -2 

20 PR1NT K%; 

30 NEXT K% 

40 PR1NT "Exit"; 

"CONTROL VAR1ABLE=”;K% 

Ok 

RUN 

Exit CONTROL VARIABLE=1 

Ok 


Incremento di Valore Uguale a Zero 


SE... 

ALLORA... 

il valore dell'incremento è 
uguale a zero 

il ciclo viene ripetuto senza fine 
(a meno che il valore iniziale ed 
il valore finale coincidano, in 
questo caso il loop non verrà 
affatto eseguito) 

Ad esempio: 

LIST 

100 FOR A%=1 TO 30 STEP 0 

110 PR1NT A%; 

120 NEXT A% 

Ok 

RUN 

1 1 1 ... 


Si dovrà impostare BI:H Q| per 
interrompere l’esecuzione 
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ISTRUZIONI DI CONTROLLO 


Nested Loops (Cicli Nidificati) 


Due o più cicli FOR/NEXT possono essere nidificati a condizione che il 
ciclo FOR/NEXT interno sia interamente compreso in quello esterno. 1 
seguenti cicli, ad esempio, sono corretti: 


- 50 FOR 1=1 TO 10 

|—100 FOR J = 2 TO 20 
1—200 NEXT J 
-300 NEXT 1 


mentre i seguenti non lo sono: 


E 


50 

100 

150 

200 


FOR 1 = 1 TO 
FOR J = 2 TO 
NEXT 1 
NEXT J 


10 

20 


Due o più cicli FOR/NEXT nidificati non devono avere la stessa variabile 
di controllo. 


Ad ogni istruzione FOR deve corrispondere una istruzione NEXT. 

Se i cicli nidificati hanno lo stesso punto finale, si può utilizzare 
per tutti una sola istruzione NEXT con una lista di tutte le variabili 
di controllo separate da una virgola. 


Esempio: 


50 FOR 1 = 1 TO 10 


100 FOR J = 2 TO 20 


200 NEXT J,1 

Quando si incontra un ciclo nidificato, questo viene eseguito. Alla fine 
dell'esecuzione del ciclo viene eseguita la prima istruzione successiva 
all'istruzione NEXT associata. 


Non c'è limite al numero di cicli interni a un altro ciclo. 11 numero di 
loop contemporaneamente attivi è limitato solo dalla quantità di memoria 
disponibile. 
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1 cicli nidificati forniscono un metodo di programmazione molto utile 
per risolvere un'ampia gamma di problemi. Qui di seguito viene 
illustrato un esempio di ciclo nidificato. 


Esempio 


VIDEO 


LIST 

10 REM PRIME NUMBERS 

20 INPUT "Enter limits N,M";N,M 

30 PR1NT "Primes from";N;"T0";M 

40 PR1NT 

50 PR1NT 

60 FOR 1=N TO M 

70 LET K=SQR(1 ) 

80 FOR J=2 TO K 
90 LET E=1/J-1NT(I/J) 

100 1F E=0 THEN 130 
110 NEXT J 
120 PR1NT 1; 

130 NEXT 1 
140 PRINT 
150 PRINT 

160 PRINT "End of List" 

170 END 

Ok 

RUN 

Enter limits N,M? 1,15 
Primes from 1 TO 15 

1 2 3 5 7 11 13 

End of List 
Ok 


COMMENTI 


sono visualizzati tutti i numeri 
primi compresi in un dato insieme. 
Un ciclo FOR/NEXT specifica l'in¬ 
sieme dei numeri presi in consi¬ 
derazione. Un secondo ciclo, nidi¬ 
ficato nel primo, contiene un 
algoritmo per determinare quali 
numeri dell'insieme specificato 
siano un numero primo. 

Per spiegare l'algoritmo: i numeri 
assegnati ad una variabile (in 
questo caso 1) sono divisi per un 
numero intero (in questo caso J) 
il cui valore è compreso tra 2 e 
la radice quadrata di I. Se il 
resto della divisione è uguale a 
0, 1 non è un numero primo. Viene 
allora generato il numero 1+1 e 
l'esecuzione viene ripetuta. La 
scelta della radice quadrata del 
valore finale viene effettuata 
poiché se vi sono fattori interi 
del numero 1, essi saranno sempre 
collocati tra 2 e la radice 
quadrata di 1. 

Nota : L'istruzione 100 consente di 
uscire dal ciclo interno anche se 
J non è maggiore di K. E' difatti 
possibile uscire da un ciclo 
quando una determinata condizione 
è soddisfatta. Non è invece possi¬ 
bile entrare nel "mezzo" di un 
ciclo. 
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ISTRUZIONI DI CONTROLLO 


Note 

- se un'istruzione NEXT viene eseguita prima della corrispondente istru¬ 
zione FOR, viene emesso il messaggio di errore: 

NEXT without FOR 

e l’esecuzione del programma viene interrotta. 

Ad esempio: 

1200 1F A >5 THEN 2010 


2000 FOR J=1 TO 7 
2010 PR1NT "HELLO"; 

2020 NEXT J 

Quando si esegue l'istruzione 2020 a seguito di un salto dall'istru¬ 
zione 1200, il BASIC visualizza il sopracitato messaggio di errore e 
ritorna in Stato Comandi. 

- il valore finale è sempre definito prima di quello iniziale. Se ad 
esempio si introduce: 

10 1=5 

20 FOR 1=1 TO 1+5 

l'istruzione 20 assegnerà il valore 10 al valore finale. Comunque per 
agevolare la leggibilità del programma, non è consigliabile usare la 
variabile di controllo per definire il valore finale. 

- se possibile, è buona norma di programmazione usare una variabile 
intera per la variabile di controllo e costanti (o variabili) intere 
per il valore iniziale e finale e per l'incremento. Ciò ottimizzerà la 
velocità di esecuzione. 


WHILE/UEND (PR0GRAMMA/IMMED1AT0) 


Esegue in ciclo una serie di istruzioni finché una determinata condizio¬ 


ne e vera. 







Figura 8-8 Istruzione WH1LE 



Figura 8-9 Istruzione WEND 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

condition 

può consistere in una espressione: 

- numerica, 

- di confronto, 

- logica 

Nota: 11 programma BASIC determina se la 
condizione (condition) è vera o falsa control¬ 
lando se il risultato dell'espressione è 
diverso o uguale a zero. Nel primo caso il 
risultato viene considerato vero, nel secondo 
falso. 

Ciò permette di verificare se il valore di una 
variabile è diverso o uguale a zero, specifi¬ 
cando semplicemente il nome della variabile 
come condizione. 
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ISTRUZIONI DI CONTROLLO 


Funzionamento delle Istruzioni UHILE/UEND 



Figura 8-10 Istruzioni WH1LE/WEND 


Nota 

Un ciclo UH1LE/WEND può essere definito "pendente" (pending) se 
interrotto da un "break" prima della sua conclusione. Qualsiasi modifica 
al programma residente (come ad esempio: cancellazione o modifica di 
linee e così via) impedirà la conclusione del ciclo. 


Esempio: 


VIDEO 

COMMENTI 

LIST 

gli elementi della matrice A$ 

90 'BUBBLE SORT ARRAY A$ 

vengono memorizzati in ordine 

100 FL1PS=1 'FORCE ONE PASS THRU LOOP 

ascendente (dall'indice 1 al- 

110 UH ILE FLIPS 

l'indice J) 

115 FL1PS=0 


120 FOR 1=1 T0 J-1 

Nota: la condizione (in questo 

130 IF A$(I) >A$(1+1 ) THEN 

caso il valore della variabile 

SUAP A$(l),A$(I+1):FL1PS=1 

FLIPS) può cambiare durante il 

140 NEXT 1 

ciclo (vedi istruzione 130). 

150 UEND 


Ok 


RUN 


Ok 
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Nota 


Non c'è limite al numero di cicli WH1LE/WEND interni a un altro ciclo 
WH1LE/WEND. Ogni istruzione WEND verrà associata alla istruzione WH1LE 
eseguita per ultima. Un'istruzione WHILE a cui non corrisponda 
un'istruzione WEND causa l'errore "WHILE without WEND”, così come 
un'istruzione WEND a cui non corrisponda un'istruzione WHILE causa un 
errore "WEND without WHILE". 

E' possibile uscire da un ciclo WH1LE/WEND, o perchè la condizione 
specificata dopo WHILE è diventata falsa, o tramite un'istruzione 
1F...THEN o GOTO. 

Non è invece possibile entrare in un ciclo WH1LE/WEND senza eseguire 
l'istruzione WHILE. 
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9. FUNZIONI 


SOMMARIO 


Questo capitolo descrive le funzioni built-in (di sistema) che possono 
essere richiamate da ogni programma senza che sia richiesta una ul¬ 
teriore definizione e le funzioni definite dall'utente che possono 
essere utilizzate esattamente nello stesso modo, ma solo nell'ambito del 
programma nel quale sono state definite. 
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FUNZIONI 


INTRODUZIONE 


Vi sono delle circostanze in cui nell'ambito dello stesso programma si 
deve fare ricorso più volte ad una stessa espressione. 

Per evitare di scrivere tali espressioni più di una volta e per 
risparmiare spazio è possibile definire funzioni e richiamarle in più 
punti del programma. 

11 richiamo di una funzione si può ottenere specificando il suo nome 
seguito da uno o più argomenti tra parentesi, rappresentanti i valori da 
passare ai parametri. Ad ogni argomento corrisponde un parametro nella 
definizione della funzione. 

Gli argomenti sono separati da virgole. Possono essere costanti, 
variabili o espressioni. Anche i parametri sono separati da 
virgole, ma possono essere solo delle variabili. 

11 numero dei parametri deve essere uguale a quello degli argomenti e il 
tipo di ogni argomento (numerico o stringa) deve essere uguale al tipo 
del parametro corrispondente. La corrispondenza è di tipo posizionale 
(cioè al primo argomento corrisponde il primo parametro, ecc...). E' 
possibile trasferire uno o più argomenti a una funzione o addirittura 
nessuno. 


Sono possibili conversioni nel passaggio di argomenti numerici a parame¬ 
tri di tipo diverso. Per esempio se si fornisce un valore a virgola mo¬ 
bile nel caso in cui è richiesto un intero, il BASIC arrotonderà tale 
valore all'intero più vicino. 


Una funzione calcola un solo valore, che può essere di tipo numerico o 
stringa in funzione del tipo di espressione usata per definire la fun¬ 
zione. 

Le funzioni del linguaggio BASIC possono essere classificate in due 
categorie principali: 

- Funzioni built-in o di sistema 

Le funzioni di sistema rappresentano una parte intrinseca del 
linguaggio BASIC, e consentono di effettuare un insieme di operazioni 
di tipo numerico o stringa di uso comune. L'utente può utilizzarle in 
qualunque programma senza dover procedere ad una definizione esplici¬ 
ta. Un elenco completo delle funzioni di sistema corredato da una 
descrizione viene fornito di seguito. 

- Funzioni definite dall'utente 
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Nell'ambito di un programma BASIC l'utente può definire un numero 
arbitrario di funzioni utilizzando l'istruzione DEF FN. 11 nome di una 
funzione definita dall'utente inizia con FN e può essere qualunque 
nome valido di variabile. 

Tutte le funzioni devono essere definite prima di essere richiamate. 


Esempi : 


VIDEO 


10 A=X*SIN(X)+L0G(X) 


LIST 

10 DEF FNH(X,Y)=SQR(X*X+Y*Y) 
20 INPUT "SIDES";X1,Y1 
30 PR1NT "H=";FNH(X1,Y1); 

"X1=";X1;"Y1=";Y1 
40 GOTO 20 
Ok 
RUN 

S10ES? 3.5,1.2 

H= 3.7 X1= 3.5 Y1= 1.2 

S10ES? 1.7,4 

H= 4.34626 X1= 1.7 Y1= 4 

S1DES? A C 
Break in 20 
Ok 


COMMENTI 


in questo caso SIN e LOG sono 
funzioni numeriche di sistema 


FNH è una funzione definita dal¬ 
l'utente. Essa viene definita 
dall'istruzione DEF FN (vedere 
l'istruzione 10), e calcola la 
radice quadrata della somma dei 
quadrati dei parametri X ed Y 
usando la funzione di sistema SQR. 

L'istruzione 30 richiama la fun¬ 
zione definita dall'utente attri¬ 
buendo due argomenti ai parametri 
corrispondenti. 

Nota: I nomi degli argomenti 
possono non coincidere con quelli 
dei parametri corrispondenti. 


FUNZIONI DEF INITE DALL' UTENTE 

Se si deve utilizzare ripetutamente una equazione di tipo numerico o 
stringa è molto più conveniente definire la stessa sotto forma di 
funzione. La funzione così definita può essere richiamata esattamente 
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FUNZIONI 


nello stesso modo delle funzioni di sistema. L'unico vincolo consiste 
nel fatto che la definizione è valida solo per quel determinato 
programma e deve quindi essere ridefinita in ogni programma che richiede 
la sua utilizzazione (a meno che il secondo programma non sia 
concatenato al primo mediante l'uso dell'opzione MERGE). 


DEE FN (PROGRAMMA) 


DEF FN definisce una funzione utente di tipo numerico o stringa. 

L'istruzione DEF FN deve essere eseguita prima che la funzione che essa 
definisce possa essere richiamata. 

L'istruzione DEF FN non é ammessa nel calcolo immediato. 



Figura 9-1 Istruzione DEF FN 



Figura 9-2 Richiamo della Funzione 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


function name 


un nome valido di variabile che inizia con FN. 
Non si devono inserire spazi tra FN e il nome 
della funzione e il primo carattere del nome 
deve essere una lettera. 


► 
























6e il nome della funzione specifica anche un tipo, il 
valore della funzione viene ricondotto a quel tipo. 

parameter 


una variabile "dummy" che dovrà essere rimpiaz¬ 
zata dal valore dell’argomento corrispondente 
quando la funzione viene richiamata. L'associa¬ 
zione argomenti/parametri è di tipo posizionale 
(cioè al primo argomento corrisponde il primo 
parametro e così via). 

argument 


il valore effettivo che dovrà essere attribuito 
al parametro corrispondente. Ogni argomento può 
essere una costante, una variabile o una 
espressione. 

expression 


una espressione che esegue l'operazione della 
funzione. 

11 tipo dell'espressione (numerico o stringa) 
deve coincidere con quello della funzione. 



L'espressione include di norma come variabili 
solo i parametri della funzione, ma può include¬ 
re anche variabili di programma definite ester¬ 
namente alla definizione della funzione (varia¬ 
bili globali). 

1 nomi di parametri che compaiono nell'espres¬ 
sione servono unicamente a definire la funzione 
e non influenzano eventuali variabili di pro¬ 
gramma che hanno lo stesso nome. Tuttavia, per 
una maggiore leggibilità del programma, si 
sconsiglia di dare lo stesso nome a un parametro 
e a una variabile di programma. 


Caratteristiche 


SE... 


ALLORA... 

il tipo di un argo¬ 
mento non ha le stes¬ 
se caratteristiche del 
parametro corrispon¬ 
dente 


si verifica un errore di "type mismatch" 
(incompatibilità di tipo) 
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una funzione definita 
dall'utente viene 
richiamata prima di 
essere definita 


si verifica l'errore di "Undefined user function" 
(Funzione utente non definita) 


una funzione definita 
dall'utente viene ri¬ 
chiamata da un'altra 
funzione definita dal¬ 
l'utente 


la funzione richiamata deve essere definita 
nell'ambito dello stesso programma in una 
posizione precedente. 

Ad esempio: 


10 DEF FNA(X)=(S1N(X/5)*3.1)/I80 
20 DEF FNB(X)=(FNA(X)+S1N(X))*.5 


un programma con¬ 
catena un altro con 
l'opzione MERGE 


le definizioni di funzione devono essere scritte 
nel programma concatenante prima dell’istruzione 
CHAIN se vengono richiamate dal programma 
concatenato. Altrimenti, quando verrà completata 
l'operazione di MERGE, la funzione definita 
dall'utente risulterà non definita, (per maggio¬ 
ri dettagli vedere il capitolo 11). 


Ad esempio: 


10 DEF FNA(X)=(X+X*(X+1)) 


100 CHAIN MERGE "V1:PR0G1" 


Note 

La sintassi del Richiamo di Funzione è valida sia per le funzioni 
definite dell'utente sia per le funzioni di sistema. 


FUNZIONI NUMERICHE DI SISTEMA 


11 linguaggio BASIC fornisce un numero di routine standard che 
consentono di evitare di scrivere gruppi di istruzioni per calcolare 
funzioni matematiche quali la radice quadrata, il seno o il logaritmo 
naturale ecc... Ad eccezione della funzione COBI che ritorna un 
risultato in doppia precisione, i risultati delle funzioni numeriche di 
sistema sono o numeri interi o numeri in singola precisione. 
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Tutte le funzioni numeriche di sistema (built-in) sono elencate qui di 
seguito in ordine alfabetico. 

Nota: In questo paragrafo descriveremo anche l'istruzione RANDOMIZE, 
perchè strettamente connessa alla funzione RND. 


I ABS (PR0GRAMMA/1MMEDIAT0) 


Calcola il valore assoluto di una espressione numerica. 


Figura 9-3 Funzione ABS 


Esempio 

PR1NT ABS (7*(-5)) 
3S 
Ok 


I ATN (PROGRAMMA/IMMEDIATO) 


Calcola 1'arcotangente dell'argomento. 

11 valore calcolato è espresso in radianti e si colloca nell'ambito di 
-rr/2 e .t/2 (dove x è 3.1415...) 


l-o- 


Figura 9-4 Funzione ATN 
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FUNZIONI 


Esempio 


10 INPUT X 

20 PR1NT ATN(X) 

Ok 

RUN 

? 3 

1.24905 

Ok 


Note 

Il calcolo di ATN viene eseguito in semplice precisione. 


COBI (PROGRAMMA/IMMEDIATO) | 


La funzione CDBL converte qualsiasi formato numerico in un argomento in 
doppia precisione (8 byte). 


—» (cdbl) — -0 - 


numenc 

expression 


Figura 9-5 Funzione CDBL 


Esempio 

10 A = 454.67 
20 PR1NT A;CDBL(A) 

RUN 

454.67 454.670013427734 

Ok 
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! CINT (PR0GRAMMA/1MMEDIAT0) 


Converte un qualsiasi argomento di tipo numerico in un intero arroton¬ 
dando la parte frazionaria (se la parte frazionaria è >.5 l'intero è 
arrotondato per eccesso, in caso contrario per difetto). 


Figura 9-6 Funzione CINT 


Esempio 

PRINT CINT(45.67) 
46 
Ok 


Note 

Se l'argomento non è compreso tra i valori -32768 e 32767 si verifica un 
errore di "Overflow". 

Vedere anche le funzioni F1X e 1NT, che forniscono anch'esse valori 
interi. 


I COS (PROGRAMMA/IMMEDIATO) 


Calcola il coseno dell'argomento. 


Figura 9-7 Funzione COS 
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FUNZIONI 


Esempio 


10 X = 2*C0S(.4) 
20 PRINT X 
RUN 

1 .84212 
Ok 


Note 


L'argomento fornito alla funzione viene assunto come la misura di un 
angolo espressa in radianti. 


La valutazione di COS è effettuata in singola precisione. 


CSNG (PROGRAMMA/IMMEDIATO) I 


Converte un argomento di tipo numerico in un numero in singola pre¬ 
cisione (4 byte). 



Figura 9-8 Funzione CSNG 


Esempio 

10 A# = 975.3421# 

20 PRINT A# ; CSNG(A#) 
RUN 

975.3421 975.342 

Ok 


Note 


Si vedano anche le funzioni C1NT e CDBL per la conversione di numeri nei 
formati interi e a doppia precisione. 
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I EXP (PR0GRAH1A/IMMEDIAT0) 


Eleva la costante "e” (dove "e" vale 2.71828) ad una potenza pari al 
valore dell'argomento. 


Figura 9-9 Funzione EXP 


Esempio 

10 X = 5 

20 PRINT EXP (X-1) 
RUN 

54.5982 

Ok 


Note 

11 valore dell'argomento deve essere < 88.7228 altrimenti viene 
visualizzato il messaggio di "Overflow"; viene fornito come risultato il 
numero massimo che la macchina può rappresentare con il segno 
appropriato e l'esecuzione continua. 

La valutazione di EXP viene effettuata in singola precisione. 


I F1X (PROGRAMMA/IMMEDIATO) 


Calcola la parte intera dell'argomento (troncamento). 


Figura 9-10 Funzione F1X 
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FUNZIONI 


Esempi 

PR1NT FIX(58.75) 
58 
Ok 

PR1NT FIX(-58.75) 

-58 

Ok 


Note 

F1X(X) è equivalente a SGN(X)*INT(ABS(X)). 

A differenza di 1NT, FIX nel caso di argomenti negativi non dà il valore 
immediatamente inferiore (vedere il secondo esempio). 


FRE (PROGRAMMA/IMMEDIATO) I 


Calcola lo spazio di memoria non utilizzato dal programma BASIC. 



dummy 

argument 



Figura 9-11 Funzione FRE 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


dummy argument 


è una espressione numerica o stringa. 11 valore 
che la funzione calcola è lo stesso qualunque 
sia l'argomento dato. 


Esempi 


PRINT FRE(0) 
14542 
Ok 
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PRINT FRE(XS) 

14542 

Ok 

FRE ("") prima di calcolare il numero di byte disponibili forza un 
"garbage collection" (eliminazione degli spazi vuoti). Inoltre il BASIC 
fa automaticamente questa operazione nel caso che si abbia saturazione 
della memoria utente. 


| 1NT (PROGRAMMA/IMMEDIATO) 

Dà l'intero più grande inferiore o uguale all'argomento. 



Figura 9-12 Funzione INI 


Esempi 

PRINT 1NT(99.89) 
99 
Ok 

PRINT 1NT(—12.11) 

-13 

Ok 


Note 

Si noti la differenza tra 1NT e F1X. In presenza di valori negativi per 
INT il risultato è sempre inferiore o uguale all'argomento, mentre per 
F1X è sempre maggiore o uguale. 
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FUNZIONI 


LOG (PROGRAMMA/1MMED1ATO) I 


Calcola il logaritmo naturale di un argomento positivo. 


Figura 9-13 Funzione LOG 


Dove: 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

numeric expression 

deve essere positiva. Altrimenti si verifica il 
messaggio di errore "lllegal function cali" 


Esempio 

PR1NT LOG(45/7) 
1.86075 
Ok 


Note 

l0 V 

Poiché log x = --, il logaritmo in base 10 (o in qualsiasi altra 

a log a 
e 

base) può essere facilmente calcolato per mezzo della funzione LOG. 


Se fosse necessario calcolare il logaritmo in base 10 di più valori 
nell'ambito di un programma, sarebbe allora opportuno definire una 
funzione utente che consenta detto calcolo. 

Ad esempio è sufficiente scrivere in testa al programma: 

10 DEF FNLOG10(X)=LOG(X)/LOG(10) 

e richiamare la funzione FNLOG10 ove necessario, passando a questa 
l’argomento desiderato. 

La valutazione della funzione LOG viene fatta in semplice precisione. 












I RND (PROGRAHMA/IMHEDIATO) 


Ritorna un numero casuale compreso tra 0 ed 1. La stessa sequenza di 
numeri casuali viene generata ogni volta che il programma viene 
eseguito, a meno che il generatore dei numeri casuali venga riinizializ- 
zato (vedere l'istruzione RANDOMIZE). 



Figura 9-14 Funzione RND 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

numeric expression 

< 0 ricomincia la stessa sequenza di numeri 
casuali. 

=0 ripete l'ultimo numero generato 


>0 (oppure omesso, cioè RND) viene generato il 
prossimo numero casuale della sequenza 


Esempio 

10 FOR 1=1 TO 5 
20 PRINT 1NT(RND*100); 
30 NEXT 
RUN 

0 25 77 68 7 

Ok 


Note 

Sebbene il numero venga chiamato casuale, esso viene in realtà estratto 
da un ciclo prefissato di numeri (circa un milione in tutto). 
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FUNZIONI 


Dal momento che il ciclo inizia per ogni esecuzione, lo stesso programma 
fornisce lo stesso risultato ogni volta che viene eseguito. 

Quando tutti i numeri sono stati utilizzati, il ciclo inizia nuovamente. 


Per modificare la sequenza dei numeri casuali ogni volta che il 
programma viene eseguito, si deve usare l'istruzione RANDOMIZE. 


RAND0M1ZE (PROGRAMMA/IMMEDIATO) 


Modifica il generatore di numeri casuali. 


RANDOMIZE 


N y numeric | 
J * expression 


Figura 9-15 Istruzione RANDOMIZE 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

numeric expression 


il suo valore deve essere compreso tra -32768 e 
32767. Se il valore non è un intero, viene 
arrotondato all'intero più prossimo. Questo 
numero viene utilizzato per definire il punto 
iniziale di una nuova sequenza di numeri 
casuali. 

Se invece viene omesso, l'esecuzione del pro¬ 
gramma viene sospesa ed il BASIC richiede un 
valore visualizzando: 

Random Number Seed (-32768 to 32767)? 

prima di eseguire l'istruzione RANDOMIZE 
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Note 


Se il generatore dei numeri casuali non è riinizializzato, la funzione 
RND dà la stessa sequenza di numeri casuali ogni volta che il programma 
viene eseguito. Per modificare la sequenza dei numeri casuali per ogni 
esecuzione del programma, si ponga l’istruzione RAND0M1ZE all'inizio del 
programma e si modifichi l'argomento ad ogni esecuzione. 

E’ anche possibile generare numeri casuali compresi in un dato 
intervallo. Per generare la sequenza tra A e B si usi la formula 

F1X((8+1-A)*RND+A) 


Esempi 

10 RANDOMIZE 
20 POR 1=1 TO 5 
30 PR1NT RND; 

40 NEXT I 
RUN 

Random Number Seed (-32768 TO 32767)? 3 (l'utente digita 3 HI ) 

.88598 .484668 .586328 .119426 .709225 
Ok 
RUN 

Random Number Seed (-32768 to 32767)? 4 (l'utente digita 4 B1 per una 
nuova sequenza) 

.803506 .162462 .929364 .292443 .322921 

Ok 
RUN 

Random Number Seed (-32768 to 32767)? 3 (stessa sequenza della prima 
esecuzione) 

.88598 .484668 .586328 .119426 .709225 
Ok 


SGN (PROGRAMMA/IMMEDIATO) 


Dà 1 se l'argomento è positivo, 0 se è uguale a zero e -1 se è negativo. 
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FUNZIONI 



Figura 9-16 Funzione SGN 

Esempio 

ON SGN(X)+2 GOTO 100,200,300 
salta a: 

- 100 se X < 0 

- 200 se X = 0 

- 300 se X > 0 

SIN (PROGRAMMA/IMMEDIATO) I 

Calcola il seno dell'argomento 


Figura 9-17 Funzione SIN 


Esempio 

PR1NT SIN(1.5) 
.997495 
Ok 
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Note 


Si assume che il valore dell'argomento sia quello di un angolo misurato 
in radianti. 

SIN viene valutato in singola precisione. 


I SQR (PROGRAMMA/IMMEDIATO) 


Calcola la radice quadrata dell'argomento. 



Hd- 


numeric 

expression 


Figura 9-18 Funzione SQR 

Esempio 

10 FOR X = 10 TO 25 STEP 5 
20 PRINT X, SQR(X) 

30 NEXT 
RUN 

10 3.16228 

15 3.87298 

20 4.47214 

25 5 

Ok 


Note 

L'argomento deve essere maggiore o uguale a zero, altrimenti si ha il 
messaggio "lllegal function cali". SQR viene valutata in singola 
precisione. 


I TAN (PR0GRAMMA/1HMED1AT0) 

Calcola la tangente dell'argomento 
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FUNZIONI 



numeric | 


expression 


Figura 9-19 Funzione TAN 


Esempio 

10 Y = Q*TAN(X)/2 


Note 

Si assume che il valore dell’argomento sia quello di un angolo misurato 
in radianti. 

Se nell'esecuzione di TAN si verifica un "overflow", viene visualizzato 
il messaggio di "Overflow", viene fornito come risultato il numero 
massimo che la macchina può rappresentare con il segno appropriato e 
l'esecuzione continua. 

TAN viene valutata in singola precisione. 


FUNZIONI STRINGA DI SISTEMA 

Sono funzioni intrinseche che calcolano un valore stringa o un valore 
numerico e consentono 1'utilizzazione di uno o più argomenti numerici 
e/o stringa. 

Semplificano operazioni stringa quali l'estrazione di una sottostringa 
da una stringa. 

Tutte le funzioni stringa di sistema sono elencate qui di seguito in 
ordine alfabetico. 


Nota 

In questo paragrafo descriveremo anche l'istruzione M1D$, perchè 
strettamente connessa alla funzione MID$. 
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I ASC (PROGRAMMA/IMtCD IATO) 


Calcola un valore numerico che è il codice decimale ASCII del primo 
carattere di una stringa data. 



o 



string 

,/ 

r * 

expression 

’V 


■O * 


Figura 9-20 Funzione ASC 


Esempio 

10 X$ = "TEST" 

20 PRINT ASC(X$) 
RUM 
84 
Ok 


Note 

Se il valore dell'argomento è la stringa nulla, si verifica un errore 
(lllegal function cali). 

Vedere la funzione CHR$ per la conversione da codice decimale ASCII a 
carattere. 


| CHRS (PROGRAMMA/IMMEDIATO) 


Calcola una stringa di un carattere il cui codice decimale ASCII è il 
valore dell'argomento. 



0-r 


Figura 9-21 Funzione CHR$ 
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FUNZIONI 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


numeric expression 


l'espressione numerica viene valutata ed arro¬ 
tondata all'intero più prossimo. Deve collocarsi 
nell'ambito di 0 e 255 e viene interpretata come 
un codice decimale ASCII. Se non cade in questo 
intervallo si ha il messaggio "lllegal function 


cali" 


Esempio 

PR1NT CHR$(66) 

B 

Ok 

Note 

La funzione CHRS viene spesso usata per inviare un carattere speciale al 
terminale. Ad esempio, può essere lanciato il carattere ASCII "BEL" 
(CHRS (7)) quale prefazione ad un messaggio di errore o la tabulazione 
di pagina (CHRS<12)) per cancellare il video e riportare il cursore alla 
posizione iniziale. 

Si veda la funzione ASC per la conversione da carattere ASCII al 
corrispondente codice decimale. 


HEX$ (PROGRAMMA/IMMEDIATO) I 


Converte un numero decimale in una stringa esadecimale. 



numeric 

expression 



Figura 9-22 Funzione HEX$ 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

numeric expression 

l'espressione numerica è arrotondata all’intero 
più prossimo prima che la funzione HEX$ venga 
valutata 

Esempio 


10 INPUT X 


20 A$ = HEXS(X) 


30 PR1NT X "DECIMAL 1S 

" A$ " HEXADEC1MAL" 


RUN 
? 32 

32 DECIMAL 1S 20 HEXADEC1MAL 
Ok 


Note 

Si veda la funzione 0CT$ per la conversione ottale. 


I INKEY$ (PROGRAMMA/IMMEDIATO) 


Ritorna una stringa di un carattere: questo è il primo carattere 
impostato in tastiera oppure è la stringa nulla se non vi sono caratteri 
impostati in attesa di essere elaborati. 1 caratteri non vengono 
visualizzati e vengono inoltrati al programma, eccetto per Bl:W U| 
che interrompe l'esecuzione del programma. 



Figura 9-23 Funzione 1NKEYS 
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FUNZIONI 


Eseapio 


1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 


VIDEO 


COMMENTI 


’Timed Input Subroutine 
RESP0NSE$="" 

FOR 1%=1 TO TIMELlMm 
A$=1NKEY$:1F LEN(A$)=0 THEN 1060 
1F ASC(A$)=13 THEN TIMEOUT%=0:RETURN 
RESPONSE$=RESPONSE$+A$ 

NEXT 1% 

TIMEOUT%=1: RETURN 


Questa routine ritorna 
due valori: 

- RESPONSES che con¬ 
tiene la stringa 
impostata 

- T1ME0UT% che equi¬ 
vale a 0 se l'utente 
imposta una stringa 
di caratteri prima 
di completare un 
dato numero di cicli 
FOR/NEXT (numero pa¬ 
ri a T1MEL1M1U), 
altrimenti equivale 
a 1 


Nota : la funzione 
LEN viene descritta 
più avanti in questo 
capitolo. 


INPUT$ (PR0GRAMMA/1MMEDIAT0) | 


Ritorna una stringa di una lunghezza specificata, impostata da tastiera 
o letta da un file su disco. 1 caratteri non sono visualizzati e sono 
inoltrati al programma eccetto per MirW H che interrompe l'esecuzio¬ 
ne del programma. 



Figura 9-24 Funzione INPUTS 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

length 

espressione numerica arrotondata all’intero più 
prossimo. Specifica la lunghezza della stringa 

file number 

è il numero Ui buffer associato al file(v.Cap. 12) 


Esempi 


VIDEO 

COMMENTI 

10 OPEN'T',1 ."DATA" 

20 1F EOF (1) THEN 50 

30 PR1NT HEX$(ASC(1NPUT$(1,#1))); 

40 GOTO 20 

50 PR1NT 

60 END 

Questo programma pro¬ 
duce un listing di un 
file sequenziale in 
caratteri esadecimali 

Nota: E0F=-1 quando si 
raggiunge la fine del 
file (v. Capitolo 12) 

110 X$=INPUT$(1) 

120 1F X$="S" THEN END 

Impostare S per arre¬ 
stare l'esecuzione 
e qualsiasi altro ca¬ 
rattere per continuare 


I INSTR (PROGRAMMA/IMMEDIATO) 


Ricerca la prima occorrenza di una sottostringa in una stringa e dà la 
posizione in cui essa viene individuata. 



Figura 9-25 Funzione INSTR 
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FUNZIONI 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

start position 

è una espressione numerica arrotondata all'in¬ 
tero più prossimo che specifica dove la ricerca 
deve iniziare. 11 suo valore deve essere 
compreso tra 1 e 255. Qualora venga omesso si 
assume il valore 1 

string 

è una espressione stringa il cui valore è la 
stringa da scandire 

substring 

è una costante o una variabile stringa di cui si 
deve cercare la prima occorrenza 


Esempio 


VIDEO 

COMMENTI 

10 X$ = "ABCDEB" 

20 Y$ = "8" 

30 PRINT 1NSTR(X$,Y$);INSTR(4,X$,Y$ 
RUN 

2 6 

Ok 

Si noti che la posizione in cui 
viene trovata la prima occorrenza 
della sottostringa viene sempre 
calcolata dall'inizio della strin¬ 
ga originaria, anche nell'eventua¬ 
lità che venga indicata una posi¬ 
zione di partenza (start position) 

Valori Speciali 

SE... 

ALLORA... 

start position >LEN (string) 

il valore della funzione è 0 

start position non è compreso 
tra i valori 1 e 255 

si ha il messaggio di errore: 

"lllegal function cali" 

string è una stringa nulla ("") 

il valore della funzione è 0 
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substring non è individuata 

il valore della funzione è 0 

substring è una stringa nulla 
e start position è specificata 

il valore della funzione è uguale 
a quello di start position 

substring è una stringa nulla 
e la start position non è speci¬ 
ficata 

il valore della funzione è 1 


I LEFTS (PROGRAMMA/IMMEDIATO) 


Fornisce una sottostringa estraendo i caratteri più a sinistra di una 
stringa data per una lunghezza pari a quella assegnata. 



+r\ * 






Figura 9-26 Funzione LEFT$ 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

string 

è una espressione stringa il cui valore corri¬ 
sponde alla stringa dalla quale la sottostringa 
deve essere estratta 

length 

è una espressione numerica arrotondata all'in¬ 
tero più prossimo il cui valore (da 0 a 255) 
rappresenta la lunghezza della stringa ritornata 

Esempio 


10 A$ = "BASIC LANGUAGE" 
20 B$ = LEFT$(A$,5) 
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FUNZIONI 


30 PRINT B$ 
RUN 
BASIC 
Ok 


Note 


SE... 

ALLORA... 

length=0 

il valore della funzione è una stringa nulla 

length non è compreso 

si ha il messaggio di errore "Illegal function 

tra 0 e 255 

cali" 


(Richiamo di funzione illegale) 

length >=LEN(string) 

il valore della funzione è l’intera stringa 


LEN (PROGRAMMA/lftlEDlATO) | 


Calcola la lunghezza di una stringa specificata. 


Figura 9-27 Funzione LEN 


Esempio 

10 X$ ="P0RTLAN0, OREGON" 
20 PRINT LEN(X$) 

RUN 

16 

Ok 


Note 

La funzione LEN conta tutti i caratteri (stampabili o meno) e anche gli spazi. 


9-27 














| «10$ - Funzione (PR0GRAMKA/IMMED1AT0) 


Estrae una sottostringa da una stringa, iniziando da una data posizione 
di carattere. Si può specificare la lunghezza della sottostringa 
richiesta. In caso contrario verranno ritornati tutti i caratteri della 
stringa da quella posizione alla fine. 



Figura 9-28 Funzione MID$ 


Dove 


ELEMENTO DI SINTASSI 

COMPENTI 

string 

è una espressione stringa il cui valore corri¬ 
sponde alla stringa dalla quale la sottostringa 
deve essere estratta 

start position 

è una espressione numerica arrotondata all'in¬ 
tero più prossimo il cui valore ( >=1 e <= 
della lunghezza della stringa) specifica la 
posizione del carattere d'inizio della sotto¬ 
stringa estratta 

length 

è una espressione numerica arrotondata all'in¬ 
tero più prossimo il cui valore (da 0 a 255) 
rappresenta la lunghezza . della sottostringa 
da estrarre. Se essa viene omessa, vengono 
estratti tutti i caratteri dalla posizione 
definita da "start position" alla fine della 
stringa. Se length = 0 la funzione fornisce la 
stringa nulla. 
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FUNZIONI 


Esempio 


LIST 

10 A$="GOOD " 

20 B$="M0RNING EVEN1NG AETERNOON" 
30 PR1NT A$;M1D$(B$,9,7) 

Ok 

RUN 

GOOO EVEN1NG 
Ok 


Note 


SE... 

ALLORA... 

start position > LEN(string) 

il valore della funzione è una 
stringa nulla 

start position=0 

si ha il messaggio di errore 
"lllegal Function cali in line 
nnnnn" (Argomento illegale nel 
numero di linea) 

length è omessa 

OPPURE 

il numero dei caratteri è in¬ 
feriore a quello specificato 
da length 

vengono estratti tutti i caratteri 
a partire da "start position" fino 
alla fine della stringa 


HID$ - Istruzione (PROGRAMMA/IMMEDIATO) | 


Sostituisce in tutto o in parte una data stringa con un'altra stringa. 


—CD H K S>T 


t-Oh 


^n-kìME H gir* H 


Figura 9-29 Istruzione MID$ 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

string 

è una variabile stringa il cui valore rappre¬ 
senta la stringa di cui bisogna sostituire una 
parte 

start position 

è un'espressione numerica il cui valore, arro¬ 
tondato all'intero più vicino deve essere >=1 e 
<c=alla lunghezza della stringa data. 

Questo valore specifica la posizione di carat¬ 
tere dove deve iniziare la sostituzione. 

length 

è un'espressione numerica il cui valore viene 
arrotondato all'intero più vicino. Esso deve 
essere compreso tra 0 e 255 e rappresenta la 
lunghezza della stringa risultante. 

Se il parametro length è omesso, vengono sosti¬ 
tuiti tutti i caratteri a partire da start 
position fino alla fine di replacing string. 
Tuttavia, indipendentemente dal fatto che 
length venga o meno specificato, la sostituzio¬ 
ne dei caratteri non va mai oltre alla lunghezza 
della stringa originaria. 

replacing string 

è un'espressione stringa il cui valore sosti¬ 
tuisce i caratteri della stringa originaria a 
partire da start position 


Esempio 

10 A$= "KANSAS CITY, MO" 
20 M1D$(A$,14)= "KS" 

30 PR1NT A$ 

RUN 

KANSAS CITY, KS 

Ok 
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FUNZIONI 


Note 


SE... 


ALLORA... 

start position > LEN (stringi 


MID$ ritorna la stringa nulla 

start position = 0 


si ha il messaggio d'errore: 

"lllegal function cali" 

length è omessa 


vengono sostituiti tutti i caratteri a 
partire da start position fino alla fine 
di replacing string. 

length =0 


M1DS ritorna la stringa nulla 

si cerca di sostituire 
caratteri oltre alla 
lunghezza della stringa 
originaria 


la sostituzione termina dopo l'ultimo 
carattere della stringa originaria 


0CT$ (PROGRAMMA/IMMEDIATO) | 


Calcola una stringa che rappresenta il valore ottale di un argomento 



Figura 9-30 Funzione 0CT$ 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

numeric expression 

l'espressione numerica è arrotondata all'intero 
più prossimo prima che la funzione 0CT$ venga 
valutata 


Esempio 

PR1NT 0CT$(24) 
30 
Ok 


Note 

Vedere la funzione HEX$ per le conversioni esadecimali 


R1GHTS (PROGRAMMA/IMMEDIATO) 


Fornisce una sottostringa estraendo i caratteri più a destra per una 
lunghezza pari a quella assegnata. 



Figura 9-31 Funzione R1GHT$ 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

string 

è un'espressione stringa il cui valore corri¬ 
sponde alla stringa originale dalla quale la 
sottostringa deve essere estratta 
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FUNZIONI 


length 

è una espressione 

numerica arrotondata 

all‘in- 


tero più vicino, 

il cui valore compreso 

tra 0 e 


255 rappresenta 

la lunghezza della 

stringa 


richiesta 




Esempio 

10 A$="D1SK BASIC" 

20 PR1NT R16HT$(A$,5) 

RUN 

BASIC 

Ok 


Note 


SE... 

ALLORA... 

length=0 

il valore della funzione è la stringa nulla 

length> =LEN(string) 

il valore della funzione è la stringa data 


SPACES (PROGRAMMA/IMMEDIATO) I 


Fornisce una stringa di spati della lunghezza richiesta. 


Figura 9-32 Funzione SPACES 

















Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


numeric expression viene arrotondata al valore intero più vicino. 


Questo valore deve essere compreso tra 0 e 255 
per evitare l'errore di "lllegal function cali". 


Indica il numero di spazi cioè la lunghezza 
della stringa richiesta 


Esempio 

10 FOR 1=1 TO 5 
20 XS=SPACE S(1) 
30 PR1NT X$; 1 
40 NEXT 1 
RUN 
1 

2 

3 

4 

5 


Note 

Vedasi anche la funzione 5PC nel prossimo paragrafo. 


I STRS (PROGRAMMA/IH1EDIATO) 


Converte il valore di un'espressione numerica in forma di stringa. 



numeric 

expression 



Figura 9-33 Funzione STR$ 
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FUNZIONI 


Esempi 


VIDEO 

COMMENTI 

5 REM AR1THMET1C EOR K10S 

10 INPUT "TYPE A NUMBER";N 

20 ON LEN (STRS(N)) GOSUB 30,100,200,300,400,500 

11 numero introdotto da 
tastiera viene assegna¬ 
to alla variabile N. 
Questo valore viene 
convertito in un valore 
stringa tramite la fun¬ 
zione STR$. 

LIST 

10 A$ = STR$ (70) 

20 PR1NT A$ 

Ok 

RUN 

70 

Ok 

70 (argomento di STR$) 
è un numero, ma il 
contenuto della varia¬ 
bile A$ è una stringa 
di due caratteri, il 
cui valore è ancora 70 
(da intendersi però 
come il carattere ASCII 
7 seguito dal carattere 
ASCII 0) 

LIST 

La conversione alla 

10 A ! =1.3 

linea 20 fa sì che il 

20 A# =VAL(STRSlA!)) 

valore di A! venga 

30 PR1NT A# 

memorizzato in A# senza 

Ok 

perdere precisione 

RUN 


1.3 


Ok 



Note 

VAL esegue la funzione inversa (vedere VAL) 


STR1NGS (PR0GRAMMA/1MMEDIAT0) I 


Crea una stringa di una lunghezza specificata, i cui caratteri sono tutti 
uguali o al carattere il cui codice ASCII è specificato, o al primo 
carattere di una stringa specificata. 
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—c STRINGS 5-0-1 length i HGH 


Figura 9-34 Funzione STRINGS 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

length 

è una espressione numerica arrotondata all'in¬ 
tero più prossimo. Specifica la lunghezza (da 0 
a 255) della stringa risultante 

numeric expression 

viene arrotondata all'intero più prossimo. 
Specifica il codice decimale ASCII (da 0 a 255) 
il cui carattere corrispondente viene utilizzato 
per formare la stringa richiesta 

string expression 

viene valutata. Il suo primo carattere viene 
utilizzato per formare la stringa richiesta 


Esempio 

10 X$=STR1NG$(10,45) 

20 PR1NT X$"MONTHLY REPORT"X$ 
RUN 

-MONTHLY REPORT- 

Ok 


I VAL (PROGRAMMA/IMMEDIATO) 


Converte la rappresentazione stringa di un numero nel suo valore 
numerico. 
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FUNZIONI 



Figura 9-35 Funzione VAL 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

string expression 

l'espressione stringa viene valutata. Quando vi 
sono spazi iniziali o finali, caratteri di 
tabulazione o di interlinea questi vengono 
eliminati. La stringa risultante, se è una 
rappresentazione numerica valida, viene conver¬ 
tita in un numero. Se la stringa comprende un 
carattere non numerico il risultato della 
funzione è zero. Ad esempio: 


VAL (" -3") dà -3 


VAL ("ABC") dà 0 


Esempio 

10 REAO NAMES,C1TY$,STATES,Z1P$ 

20 IF VAL(Z1P$)< 90000 OR VAL(Z1P$) >96699 THEN 
PRINT NAMES TA8(25) "OUT OF STATE” 

30 1F VAL (Z1P$) >=90801 AND VAL (Z1P$) <=90815 THEN 
PRINT NAMES TA8(25) "LONG BEACH" 


Note 

STR$ esegue la funzione inversa (vedere STR$). 
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FUNZIONI DI INPUT/OUTPUT E FUNZIONI SPECIALI DI SISTEMA 


Queste funzioni facilitano l'esecuzione di operazioni di input/output, 
le conversioni di valori, la gestione degli errori, il posizionamento 
del cursore, le allocazioni delle aree di memoria, ecc. Tali funzioni 
sono elencate qui di seguito. 


Note 

In questo paragrafo includiamo anche le parole stringa riservate DATE$ e 
TIMES (che possono essere usate o come funzioni, se appaiono in una 
espressione, o come variabili, se scritte alla sinistra del segno di 
uguale in una istruzione di assegnazione). 


I DATES/T1MES (PROGRAMMA/IMMEDIATO) 


Sono elementi del PCOS che possono essere letti o inizializzati da BASIC 
per mezzo di questi nomi stringa riservati. 



Figura 9-36 DATES e TIMES 


Note 

La data e l'ora possono essere impostate sia in PCOS per mezzo del 
comando SSYS o in BASIC per mezzo di una istruzione di assegnazione. La 
data può essere impostata sia come mm:dd:yy, o come mm:dd:yyyy. L’ora 
viene impostata come hh:mm:ss. L'utente può usare propri delimitatori. 
(Qualsiasi carattere ASCII tranne le cifre). Per più dettagliate 
informazioni vedere "Professional Computer Operating System (PCOS) - 
Guida Utente". 
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FUNZIONI 


Esempio 


VIDEO 

COMMENTI 

100 1F DATE$="04:30:82" 

THEN 3000 

l'istruzione 100 controlla che la 
data sia quella desiderata 

500 DATE$="05/06/1981" 

l'istruzione 500 imposta la data 
(cambiando anche il delimitatore) 

l'istruzione 600 visualizza l'ora 

600 PR1NT TIMES 

l'istruzione 700 imposta l'ora 

700 TIME$="07:40:15" 



CVD (PROGRAMMA/IMMEDIATO) | 


Converte una stringa di 8 caratteri in un numero in doppia precisione 


Vedere Capitolo 12. 



CVI (PROGRAMMA/IMMEDIATO) | 


Converte una stringa di 2 caratteri in un intero; 


Vedere Capitolo 12. 



CVS (PROGRAMMA/IMMEDIATO) | 


Converte una stringa di 4 caratteri in un numero in singola precisione 
Vedere Capitolo 12. 
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| EOF (PROGRAMMA) 


Dà -1 se viene raggiunta la fine del file. 

Vedere Capitolo 12. 

I ERL (PROGRAMMA/IMMEDIATO) 

Dà il numero di linea della linea in cui è stato trovato l'errore. 

Vedere Capitolo 13. 

I ERR (PR0GRAMMA/1MMED1AT0) 

Dà il numero del codice di errore. 

Vedere Capitolo 13. 

I LOC (PROGRAMMA/IMMEDIATO) 

Dà il numero del record appena letto o scritto (file random), o il 
numero di settori letti o scritti da quando il file è stato aperto (file 
sequenziali). 

Vedere Capitolo 12. 

I LPOS (PROGRAMMA/1MMED1ATO) 

Ritorna la posizione attuale della testina della stampante (nell’ambito 
del buffer di linea della stampante). 



dummy 

argument 



Figura 9-37 Funzione LPOS 
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FUNZIONI 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

dummy argument 

è una qualsiasi espressione numerica o stringa. 

11 risultato non dipende dall'argomento dato 


Esempio 

100 IF LPOS(X) >60 THEN LPR1NT CHRS(13) 


MKD$ (PROGRAMMA/1MMED1ATO) | 


Converte un numero in doppia precisione in una stringa di 8 caratteri. 
Vedere Capitolo 12. 


MK1$ (PR0GRAHMA/1MMED1AT0) | 


Converte un numero intero in una stringa di 2 caratteri. 
Vedere Capitolo 12. 


MKS$ «PROGRAMMA/IMMEDIATO) | 


Converte un numero in singola precisione in una stringa di 4 caratteri. 
Vedere Capitolo 12. 


SPC (PR0GRAMMA/1MME01AT0) I 


Inserisce gli spazi nelle istruzioni PR1NT o LPR1NT. 




















Figura 9-38 Funzione SPC 


Dove 


ELEMENTO DL SINTASSI 


SIGNIFICATO 


numeric expression 


viene arrotondata all'intero più vicino. Indica 
il numero di spazi da inserire nell’immagine 
visualizzata sia tra due dati sia all'inizio o 
alla fine dell'immagine. 


11 numero degli spazi deve essere compreso tra 1 
valori 0 e 255 (onde evitare l'errore "lllegal 
function cali'') 


Esempio 

PR1NT "OVER" SPC(15) "THERE" 
OVER THERE 

Ok 


Note 

In una istruzione PR1NT o LPR1NT la funzione SPC deve essere seguita o 
da un punto e virgola o da uno spazio. 

Vedere anche la funzione SPACE$. 
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FUNZIONI 


TAB (PROGRAMMA/IMMEDIATO) | 


In una istruzione di PR1NT o di LPR1NT, la funzione TAB posiziona il 
cursore o la testina della stampante alla posizione specificata. 



Figura 9-39 Funzione TAB 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

numeric expression 


viene arrotondata all'intero più vicino. 11 
valore dell'espressione deve essere compreso tra 

1 e 255 (onde evitare l'errore "lllegal function 
cali"). 



11 valore minimo è 1, l'ampiezza della linea -1 
è il limite destro. 



Questo valore specifica la posizione del cursore 
(o della testina della stampante) in una linea. 


Esempio 

10 PR1NT "NAME" TAB(25) "AM0UNT":PR1NT 
20 READ A$,B$ 

30 PR1NT A$ TAB(25) B$ 

40 DATA "G.T.JONES","$25.00" 

RUN 

NAME AMOUNT 

G.T.JONES $25.00 

Ok 
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Note 


Se la posizione del cursore o della testina scrivente della stampante è 
oltre la posizione indicata dal valore dell'argomento, TAB fa si che il 
cursore o la testina si posizionino nella giusta posizione sulla linea 
successiva. 


I VARPTR (PRO&RAMMA/IHMEDIATO) 

Formato 1. Fornisce l'indirizzo di memoria del primo byte del dato 
associato alla variabile specificata. 

Formato 2. Nel caso di file sequenziali fornisce l'indirizzo iniziale 
del buffer di 1/0 associato al file. Nel caso di file random fornisce 
l'indirizzo iniziale del buffer di 1/0 associato al file, definito 
tramite l'istruzione F1ELD. 


- VARPTR GM 


variable 

name 




file 

number 



Figura 9-40 Funzione VARPTR 
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FUNZIONI 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

variable nane 

qualsiasi tipo di variabile (numerica, stringa o 
matrice). L'indirizzo ritornato sarà un'intero 
compreso tra -32768 e 32767. 

Nota: Se l’indirizzo ottenuto è negativo, si 
deve aggiungere 65536 per ottenere l'indirizzo 
effettivo 

file number 

numero del buffer associato al file 


Esempio 

100 X%=VARPTR(A(0)) 


Note 

Se, prima dell'esecuzione della VARPTR, non è stato assegnato alcun 
valore alla variabile (e questa è una variabile semplice) si verificherà 
l'errore "Illegal funzione cali". 

La VARPTR viene generalmente usata per ottenere l'indirizzo di una 
variabile o di una matrice affinchè possa essere passata ad un 
sottoprogramma in linguaggio Assembler. La funzione viene usata nella 
forma VARPTR (A(0)) per ottenere l'indirizzo del primo elemento della 
matrice. 
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10. SOTTOPROGRAMMI 


SOMMARIO 


Spesso, una stessa sequenza di istruzioni deve essere eseguita più di una 
volta nell'ambito di uno stesso programma. In questo caso l'utente non 
deve riscrivere questa sequenza più volte, ma può scrivere un sottopro¬ 
gramma che può essere richiamato in qualsiasi punto del programma. Alla 
fine dell'esecuzione del sottoprogramma, il controllo ritorna all'istru¬ 
zione successiva a quella del richiamo. 

L'M20 consente di utilizzare due tipi diversi di sottoprogrammi richia¬ 
mabili da un programma BASIC: 

- sottoprogrammi scritti in BASIC ("BASIC Subroutines") 

- sottoprogrammi scritti in linguaggio ASSEMBLER M20 o comandi PCOS. 

11 seguente capitolo illustra questi due tipi di sottoprogrammi e i 
meccanismi di richiamo. 


INDICE 

BASIC SUBROUTINES 10-1 

GOSUB/RETURN (PROGRAMMA) 10-3 

0N...G0SUB/RETURN (PROGRAMMA) 10-7 

COMANDI PCOS RICHI A MABILI 10-9 
DA BASIC E SOTTOPROGRAMMI 
ASSEMBLER 

CALL (PROGRAMMA/IMMEDIATO) 10-10 

EXEC (PROGRAMMA/IMMEDIATO) 10-12 

SYSTEM (PROGRAMMA/IMMEDIATO) 10-14 

T ASTI PROGRAMMABILI 10-14 

TASTIERE CON VERBI BA SIC 10-15 

SELEZIONE DA BASIC 10-16 

DELLE UNITA' DI INPUT/ 

OUTPUT 
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SOTTOPROGRAMMI 


BASIC SUBROUT1NES 


Una subroutine BASIC è costituita da un insieme qualsiasi di istruzioni 
BASIC ed è parte integrante del programma. Di norma (ma non necessaria¬ 
mente) inizia con un'istruzione REM e termina con un'istruzione RETURN. 
E' buona norma di programmazione scrivere le subroutine una dopo l'altra 
alla fine del programma e chiudere il programma principale (prima del¬ 
l'inizio della prima subroutine) con un'istruzione END, oppure GOTO, 
oppure STOP. 

Una subroutine può essere richiamata da un'istruzione GOSUB oppure 
0N...G0SUB. Alla fine dell'esecuzione della subroutine, il controllo 
ritorna all'istruzione successiva a quella del richiamo. 

Diremo che una subroutine è "pendente" se il controllo non è stato ancora 
restituito al programma principale quando si è verificata una interru¬ 
zione. Ogni eventuale modifica al programma residente in memoria (can¬ 
cellazione, modifica di linee ecc...) impedirà di ridare il controllo 
alla subroutine. 

11 seguente esempio illustra il meccanismo di richiamo di una subroutine 
(istruzioni GOSUB e RETURN). 


PROGRAMMA 


COMMENTO 


10 REM Programma 
Principale 


Quando viene eseguita l'istruzione 50 del pro¬ 
gramma principale (GOSUB) il controllo viene 
trasferito all'istruzione 250 (che è la prima 
istruzione della subroutine). 


-50 GOSUB 250 
60 PRINT X i 


240 GOTO 500 
U.250 REM Subì 
260 Z=SQR(T) 


La subroutine viene quindi eseguita e quando si 
incontra l'istruzione 290 (RETURN), il controllo 
viene trasferito all'istruzione 60, cioè alla 
prima istruzione dopo la GOSUB. 

L'istruzione 240 (GOTO), evita una eventuale 
attivazione non corretta della subroutine 


290 RETURN - 


500 END 
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Se un programma richiama una stessa subroutine più di una volta, alla 
fine dell'esecuzione della subroutine il controllo viene sempre trasferi¬ 
to alla istruzione successiva all'ultima GOSUB (o 0N...G0SUB) che è stata 
eseguita. 

Per esempio, consideriamo un programma che contenga le seguenti istruzio¬ 
ni: 


PROGRAMMA 

COMMENTI 

10 REM Programma 
Principale 

Quando la subroutine viene attivata tramite 
l'istruzione 50 (GOSUB), il controllo viene 
trasferito, alla fine dell'esecuzione della 
subroutine, all'istruzione 60. 

r-50 GOSUB 250 

60 PR1NT X«- 

-140 GOSUB 250 

150 1F X > 32 THEN 30-* 

240 GOTO 500 
-►250 REM Subì 

260 Z=SQR(T) 

Quando la subroutine viene di nuovo attivata 
tramite l'istruzione 140 (GOSUB), il controllo 
viene trasferito, alla fine dell'esecuzione 
della subroutine, all'istruzione 150 

290 RETURN 


500 END 



Una subroutine può essere anche richiamata da un'altra subroutine. In 
questo caso, diremo che la subroutine richiamata è "nested" (annidata) 
nella subroutine che la ha attivata. 

Questo meccanismo può essere ripetuto più volte: il numero di subroutine 
"nested" contemporaneamente attive, (cioè con istruzione RETURN non 
ancora eseguita), è limitato solo dalla memoria disponibile. 
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SOTTOPROGRAMMI 


Ogni istruzione GOSUB, sia essa nel programma principale o in una subrou¬ 
tine, viene sempre associata ad una istruzione RETURN. Questa istruzione 
RETURN è quella che trasferisce il controllo all'istruzione successiva 
alla GOSUB. Questo tipo di associazione viene fatto in modo dinamico 
(cioè durante l'esecuzione): la prima istruzione RETURN eseguita viene 
associata all'ultima GOSUB eseguita, la seconda RETURN alla penultima 
GOSUB, e così via. 


PROGRAMMA 


COMMENTO 


10 REM Programma 
Principale 


- 800 GOSUB 1500 trasferisce il controllo alla 
subroutine Subì 


|—800 GOSUB 1500 
810 «- 


- 1500 REM Subì individua l'inizio della subrou¬ 
tine Subì 

- 1900 GOSUB 2500 trasferisce il controllo da 
Subì a Sub2 ("nested" subroutine) 


1490 END 
-►1 500 REM Subì 


—1900 GOSUB 2500 
1910 «- 


- 2500 REM Sub2 individua l'inizio della subrou¬ 
tine Sub2 

- 3000 RETURN trasferisce il controllo all'i¬ 
struzione successiva all'ultima GOSUB eseguita 
(cioè all'istruzione 1910) 

- 2490 RETURN trasferisce il controllo alla 
istruzione successiva alla penultima GOSUB 
eseguita (cioè all'istruzione 810) 


2490 RETURN — 
'-►2500 REM Sub2 


3000 RETURN 


GOSUB/RETURN (PROGRAMMA) 


GOSUB richiama una subroutine passando il controllo al primo numero di 
linea della subroutine. 
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RETURN trasferisce il controllo alla prima ist-uzione successiva all'ul¬ 
tima GOSUB (oppure 0N...G0SUB) eseguita. 



Figura 10-1 Istruzione GOSUB 



Figura 10-2 Istruzione RETURN 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

line number 


è il primo numero di linea di una subroutine 


Caratteristiche 


UNA SUBROUTINE PUÒ'... 


COMMENTI 

iniziare con qualsiasi istruzio¬ 
ne (ad esclusione di NEXT e WEND) 


per esempio una subroutine può 
iniziare con REM, LET, F0R,...ecc.. 



E' buona norma di programmazione 
iniziare sempre una subroutine con 
REM ( o con un’istruzione che 
termina con un campo commento) 
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SOTTOPROGRAMMI 


finire con un'istruzione RETURN 


è buona norma di programmazione 
finire sempre una subroutine con 
un’istruzione RETURN. In ogni caso 
RETURN deve essere l'istruzione 
eseguita per ultima, dato che è 
l'unica istruzione che consente di 
ridare il controllo al programma 
principale. 


essere richiamata in qualunque 
punto del programma, e un numero 
qualsiasi di volte 


essere inserita in qualsiasi 
punto del programma 


Una subroutine può avere anche più 
di una istruzione RETURN (ad esem¬ 
pio quando è strutturata in modo da 
avere più diramazioni ognuna delle 
quali richieda di ridare il con¬ 
trollo al programma principale) 

se un programma richiama una stessa 
subroutine più di una volta, il 
controllo viene trasferito dalla 
subroutine all'istruzione che segue 
la GOSUB (oppure la ON...GOSUB) 
eseguita per ultima 

però è buona norma di programma¬ 
zione scrivere le subroutine una 
dopo l'altra alla fine del program¬ 
ma, e chiudere il programma (prima 
dell'inizio della prima subroutine) 
con un'istruzione END, oppure GOTO, 
oppure STOP 


richiamare un'altra subroutine 


accedere ad ogni variabile di 
programma 


il numero di subroutine "nested" 
contemporaneamente attive, cioè con 
istruzione RETURN non ancora ese¬ 
guita), è limitato solo dalla 
memoria disponibile 

tutte le variabili definite nel 
programma "principale" sono note 
anche alla subroutine. Queste pos¬ 
sono quindi operare su ogni varia¬ 
bile senza restrizioni, (modi¬ 
ficandone anche il valore) 
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Esempi 


VIDEO 

COMMENTI 

LIST 

questo è un programma atto ad 

10 DEF1NT A-Z 'definisce tutte le 

evidenziare l'uso di una subrou- 

variabili intere 

ti ne. 

20 INPUT "Introduci 3 interi"; A,B,C 


30 LET X=A 

La subroutine utilizza l'algoritmo 

40 LET Y=B 

di Euclide, per trovare il massimo 

50 GOSUB 110 

comune divisore (MCD) di tre numeri 

60 LET X=M 

interi (A, B e C). Questi vengono 

70 LET Y=C 

introdotti da ta|tiera: i primi due 

80 GOSUB 110 

A e B vengono assegnati rispettiva- 

90 PR1NT "MCD di";A;B;C"=”;M 

mente alle variabili X e Y (vedi 

100 GOTO 190 

istruzioni 30 e 40) e la subroutine 

110 LET Q=1NT(X/Y) 'subroutine per 

determina il loro MCD (vedi istru- 

trovare l'MCD di 

zioni da 110 a 180). 

X e Y 


120 LET R=X-Q*Y 

L'MCD trovato viene assegnato alla 

130 1F R=0 THEN 170 

variabile X nell'istruzione 60 e il 

140 LET X=Y 

terzo numero (C) viene assegnato 

150 LET Y=R 

alla variabile Y nell'istruzione 

160 GOTO 110 

70. 

170 LET M=Y 


180 RETURN 

La subroutine viene richiamata di 

190 END 

nuovo (vedi istruzione 80) per 

Ok 

trovare l'MCD di questi due numeri. 

RUN 


Introduci 3 interi? 1377,2916,405 

Il risultato è l'MCD dei tre nume- 

L'MCD di 1377 2916 405 = 81 

ri. Essi vengono visualizzati in- 

OK 

sieme con il loro MCD tramite 

RUN 

l'istruzione 90. 

Introduci 3 interi? 4,3333,67 


L'MCD di 4 3333 67 = 1 

Nota: L'istruzione 10 definisce 

Ok 

tutte le variabili intere, dato che 


il programma opera solo su numeri 


interi 

LIST 

Questo programma calcola la somma 

10 INPUT "Introduci N>0";N% 

dei numeri interi da 1 a N (dove N 

20 IF N%<=0 THEN 10 

è introdotto da tastiera) e su 

30 GOSUB 50 

richiesta, la somma dei quadrati di 

40 END 

questi numeri. 

50 REM SUBÌ (Somma di Interi) 


60 S%=(N%*(NU1))/2 

11 programma ha due subroutine SUBÌ 
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70 PR1NT "Somma di Interi da 1 
a ";N%;"="; S% 

80 INPUT "Somma di Quadrati 
(S/N)";X$ 

90 IF X$="S" THEN GOSUB 110 
100 RETURN 

110 REM SUB2 (Somma di Quadrati) 
120 S2%=(N%*(NU1 )*(2*N%+1 ) )/6 
130 PR1NT "Somma di Quadrati da 
1 a ";N%;"=";S2% 

140 RETURN 

Ok 

RUN 

Introduci N>0? 5 

Somma di Interi da 1 a 5= 15 

Somma di Quadrati (S/N)? S 

Somma di Quadrati da 1 a 5= 55 

Ok 


e SU82 inserite alla fine (istru¬ 
zione da 50 a 100 e da 110 a 140). 

Vengono prima eseguite le istruzio¬ 
ni 10, 20 e 30. L'istruzione 30 

(GOSUB) richiama la subroutine SUBÌ 
e le istruzioni di quest'ultima 
vengono eseguite in sequenza fino 
all'istruzione 90. 

Questa esegue un test: 

- se il valore di X$ (introdotto da 
tastiera) è diverso da "S", il 
controllo passa all'istruzione 
100 (RETURN) e quindi all'i¬ 
struzione 40 (END) 

- se il valore di X$ è uguale a 
"S”, viene richiamata la sub¬ 
routine SUB2 (che è quindi 
"nested"). Quando si arriva alla 
istruzione 140 (RETURN di SUB2), 
il controllo passa all'istruzione 
100 (RETURN di SUBÌ) e quindi 
alla 40 (END). 


ON—GOSUB/RETURN (PROGRAMMA) 


L’istruzione 0N...G0SU8 richiama una subroutine scelta tra n subroutine 
specificate. 

L'istruzione RETURN trasferisce il controllo alla prima istruzione 
successiva all'ultima ON...GOSUB (o GOSUB) eseguita. 
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Figura 10-3 Istruzione ON_GOSUB 



Figura 10-4 Istruzione RETURN 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

numeric expression 

il suo valore specifica la subroutine da richia¬ 
mare: 


- Se il suo valore è 1, viene richiamata la 
subroutine il cui primo numero di linea è il 
primo della lista. 


- Se il suo valore è 2, viene richiamata la 
subroutine il cui primo numero di linea è il 
secondo della lista, e così via. 


- Se il suo valore non è intero, viene arroton¬ 
dato all'intero più vicino. 


- Se il suo valore è uguale a 0, o è maggiore 
del numero di line number della lista (ma 
minore o uguale a 255), viene eseguita l'i¬ 
struzione successiva alla ON...GOSUB. 

l 


► 
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- Se il suo valore è negativo o maggiore di 255, 
si ha il seguente messaggio d'errore: 


line number 


lllegal funtion cali 


ogni line number specificato deve essere 
primo numero di linea di una subroutine 


il 


Esempio 


VIDEO 


COMMENTI 


LIST 

10 INPUT "Introduci 1,2 o 3";K% 
20 ON K% GOSUB 40,50,60 
30 END 

40 PR1NT "SUBÌ":RETURN 
50 PR1NT "SUB2":RETURN 
60 PR1NT "SUB3":RETURN 
Ok 
RUN 


se l'utente introduce il numero 1, 
il programma visualizza SUBÌ, se 
introduce 2 visualizza SUB2, se 
introduce 3 visualizza SUB3. 

In ognuno di questi casi una istru¬ 
zione RETURN trasferisce il con¬ 
trollo alla END; 


Introduci 1,2 o 3? 2 


Se l'utente introduce un intero tra 


SUB2 

Ok 


0 e 255, diverso da 1, 2 o 
programma non visualizza nulla. 


3 


il 


COMANDI PCOS RICHIAMABILI DA BASIC E SOTTOPROGRAMMI ASSEMBLER 


Le istruzioni CALL ed EXEC consentono di richiamare da BASIC sottopro¬ 
grammi Assembler o comandi PCOS. 

Entrambe queste istruzioni hanno la stessa funzione ma: 

- EXEC viene usata quando gli argomenti da passare ai corrispondenti 

parametri sono valori costanti; 

- CALL viene usata quando gli argomenti da passare ai corrispondenti 

parametri sono o costanti o variabili di programma. 
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Le istruzioni CALL ed EXEC possono essere utilizzate sia in un programma 
BASIC sia in modo immediato, ma sono più spesso usate in un programma. 

Alla fine dell'esecuzione di un sottoprogramma Assembler o di un comando 
PCOS, il controllo ritorna all'istruzione seguente a quella del richiamo 
(se CALL o EXEC sono state usate in un programma) oppure ritorna al BASIC 
Stato Comandi (se CALL o EXEC sono state usate in modo immediato). 

L'utilizzo di CALL o EXEC consente di eseguire un programma che interagi¬ 
sce con il PCOS, per esempio per settare i valori delle variabili globali 
di sistema prima di eseguire altri programmi BASIC o comandi PCOS. 

Alla fine dell'esecuzione di questo programma è possibile restare in 
BASIC o passare in PCOS (tramite il comando SYSTEM). 

Normalmente un tale programma di inizializzazione viene denominato 
1N1T.BAS. 

Questo è un nome di file riservato. L'M20 dopo aver caricato il PCOS e il 
BASIC ricerca questo file su entrambi i drive. Se viene trovato, l'M20 
entra in BASIC ed esegue 1NIT.8AS. 


Note 

Alla fine dell'esecuzione di una istruzione CALL o EXEC che attiva un 
comando SBASIC del PCOS i nuovi valori settati da SBASIC non verranno 
presi in considerazione per il programma attuale (perché potrebbe essere 
distrutto), ma diventeranno operativi per i programmi successivi, quando 
il sistema rientra in BASIC. 

Solo l'istruzione EXEC (non la CALL) consente di selezionare da BASIC le 
unità di input/output (per ulteriori dettagli vedasi "Professional 
Computer Operating System (PCOS)- Guida Utente"). 


CALL (PROGRAMMA/IMMEDIATO) 


Richiama da BASIC un comando PCOS o un sottoprogramma ASSEMBLER, passando 
al sottoprogramma variabili di programma o costanti. 
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Figura 10-5 Istruzione CALL 


Dove 

ELEMENTO DI SINTASSI 

SIGNIFICATO 

subprogram name 

può essere o il nome di un comando PCOS o il nome 
di un sottoprogramma ASSEMBLER. Può essere una co¬ 
stante stringa o una variabile stringa 

argument 

può essere una costante o una variabile semplice o 
un'espressione il cui valore viene trasferito al 
parametro corrispondente (il meccanismo di passag¬ 
gio argomenti/parametri è del tutto analogo a quel¬ 
lo visto per le funzioni - vedi Capitolo 9). 

Se "argument" è un argomento di output (cioè se il 
sottoprogramma ritorna un valore al BASIC), il no¬ 
me dell'argomento deve essere preceduto dal sim¬ 
bolo @. 

Un argomento variabile (di input o di output) deve 
essere inizializzato prima di eseguire la CALL. 

Se l'argomento è numerico deve essere intero. 


Fsempi 


VIDEO 


COMMENTI 


10 0EF1NT A-C 


30 F1LE$="V0L1:FILE001" 
40 S1ZE%=10 

50 CALL "fn"(FILE$,S!ZE%) 


l'istruzione 50 richiama il comando 
PC05 FNEW, passando l'identifi¬ 
catore di file tramite la variabile 
stringa F1LE$ e la dimensione del 
file tramite la variabile numerica 
SIZE%. 


L’istruzione 100 richiama il coman-^ 
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90 C$ ="LIST" 

100 CALL "pK”(&41,C$) 


do PCOS pkey specificando il tasto 
tramite la costante esadecimale &41 
(cioè A, vedere tabella ASCII, 
appendice A) e la stringa corri¬ 
spondente tramite la variabile C$. 


220 A = 10 
230 B = 20 
240 C = 200 

250 CALL "SUB121 "(A,B,(g> C) 


L'istruzione 250 richiama il sotto¬ 
programma ASSEMBLER SUBÌ 21 passan¬ 
do due argomenti di input (A e B) e 
uno di output (@C). Si noti che 
questi argomenti sono stati preven¬ 


tivamente inizializzati. 


Note 

11 comando LTERM del PCOS viene di solito richiamato da BASIC tramite 
1'istruzione CALL. 

Esso ritorna un valore intero (0, 1, 2) corrispondente all’ultimo tasto 
di chiusura impostazione utilizzato ( Qj . HI FEW . 

11 comando PCOS CI (Communication Interface) viene di solito richiamato 
da BASIC per inviare o ricevere caratteri in linea tramite la porta 
RS-232-C. 

Altri comandi PCOS (LABEL, SPRINT, BVOLUME, ecc.) sono di solito 
richiamati da BASIC. 

Per ulteriori informazioni vedere "Professional Computer Operating 
System (PCOS) - Guida Utente" e per il comando CI vedere "I/O con 
Periferiche Esterne - Guioa Utente". 


EXEC (PR0GRAMMA/IMMED1AT0) 


Richiama da BASIC un comando PCOS o un sottoprogramma ASSEMBLER, passando 
valori costanti al sottoprogramma. 


Figura 10-6 Istruzione EXEC 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

string expression 

il suo valore viene interpretato come il nome di 
un sottoprogramma seguito da una lista di 
argomenti costanti 


Note 

Se EXEC richiama un comando PCOS, il contenuto della espressione stringa 
dopo EXEC deve coincidere con il comando così come l'utente avrebbe 
dovuto impostarlo per eseguirlo in PCOS. 

Se l'istruzione EXEC richiama un sottoprogramma in linguaggio Assembler, 
il contenuto dell'espressione stringa dopo EXEC è una lista di parametri 
separati da virgole; il primo specifica il nome del sottoprogramma ed i 
successivi specificano gli argomenti da passare al sottoprogramma. 

Nota : Gli argomenti non sono racchiusi in parentesi e possono solo essere 
costanti. 


Esempi 


100 EXEC "pK 


VIDEO 


COMENT! 




' RUN VI :CASHFL0W 


l'istruzione 100 permette di ri¬ 
chiamare da BASIC il comando PCOS 
PKEY, per assegnare la stringa "RUN 
VI:CASHFL0W" al tasto # . 


150 EXEC "fp 1:MY.F11E/SECRET" 


180 A$="FN 1 :FILEA,15" 


Si noti che le stringhe: 

-# 

- RUN VI:CASHFL0U 

devono essere racchiuse tra apici 
(') come se si operasse in PCOS. 

► 
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230 EXEC A$ 


L'istruzione 150 permette di ri¬ 
chiamare da BASIC il comando PCOS 
FPASS per assegnare la password 
SECRET al file MY.F1LE, residente 
sul disco inserito nell'unità 1. 


L'istruzione 230 permette di ri¬ 
chiamare il comando PCOS FNEW, 
specificando il comando tramite il 
contenuto di una variabile stringa 
inizializzata con l'istruzione 180. 


SYSTEM (PR0GRAMMA/1MMED1AT0) 


Consente di passare da BASIC a PCOS e di chiudere tutti i file dati. 



SYSTEM 


Figura 10-7 Comando SYSTEM 


Note 

Il comando SYSTEM permette all'utente di ritornare in PCOS. Può essere 
usato sia in modo immediato sia all'interno di un programma BASIC. Viene 
frequentemente usato come ultima istruzione di un programma di inizializ- 
zazione che utilizza istruzioni CALL ed EXEC per eseguire in sequenza una 
serie di comandi PCOS e/o sottoprogrammi ASSEMBLER. Per maggiori dettagli 
vedere "PCOS (Professional Computer Operating System) - Guide dell'Uten¬ 
te". 


T ASTI PROGRAMMABILI 

Usando i tasti e WiTTIUiM . assieme a qualsiasi altro tasto (che 
non sia un tasto shift), l'utente può assegnare un significato partico¬ 
lare a ogni tasto. 
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Questo può essere un comando PCOS o BASIC, un'espressione, una costante o 
qualsiasi sequenza di caratteri da impostare frequentemente. 

L'assegnazione può essere fatta sia in un programma BASIC per mezzo della 
CALI "pkey" (o EXEC "pkey") o in PCOS per mezzo del comando PKEY. 

A seconda delle esigenze dell'utente, l'assegnazione di una determinata 
funzione ad un tasto può essere permanente (cioè questa funzione può 
venir attribuita in modo automatico ad ogni inizializzazione del sistema 
usando un PCOS "personale") oppure temporanea (cioè valida finché il 
sistema non viene reinizializzato). Per ulteriori dettagli vedere "PCOS 
(Professional Computer Operating System) - Guida Utente". 


TASTIERE CON VERBI BASIC 

Per definire i tasti con i verbi BASIC (siglati sulla tastiera USA-ASCII 
+ verbi BASIC e sulla tastiera Inglese) è disponibile un programma di 
nome BKEYBOARD.BAS. 

Questo programma è costituito da una serie di istruzioni PKEY che defini¬ 
scono i tasti per generare i verbi BASIC, premendo contemporaneamente il 


COHHANO 


Il programma risiede sul dischetto standard di sistema. 

L'utente può eseguirlo impostando: 
bk B:1 

in PCOS, oppure: 

RUN "BKEYBOARD.BAS" PTB 
in BASIC. 

Eseguendo questo programma le definizioni dei tasti restano valide fino 
alla prossima inizializzazione. 

Se l'utente vuole che le definizioni restino valide ad ogni inizializza¬ 
zione senza bisogno di eseguire ogni volta il programma, deve creare un 
PCOS personale con il comando PSAVE e inizializzare il sistema con quel 
PCOS. 

Per ulterioni dettagli vedere "PCOS - Guida Utente". 
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SELEZIONE DA BASIC DELLE UNITA' DI INPUT/OUTPUT 


E' possibile da BASIC eseguire un comando PCOS selezionando contempora¬ 
neamente una unità di 1/0 (tramite un'istruzione EXEC o CALL). La sele¬ 
zione permane finché non viene eseguito un altro comando atto a modifi¬ 
carla o non si esca dall'ambiente BASIC. Se però la EXEC (o la CALL) fa 


una selezione permanente, 
ritornando in PCOS. 

questa continua ad essere valida anche 


Esempi 


Se l'utente imposta... 

ALLORA... 

ba 

il sistema carica in memoria l'interprete 
BASIC ed entra in BASIC (Stato Comandi). 

EXEC "VL 1 : ,+01:0UT" 

La prima istruzione EXEC provoca la visua¬ 
lizzazione della directory del dischetto 
inserito nel drive 1 e la registrazione di 
quanto appare su video anche sul file di 
nome OUT. 

EXEC "-D1 :0UT" lì! 

Questo file viene creato, se non esiste sul 
dischetto specificato. Se esiste lo rico¬ 
pre. 

Il file viene disabilitato come unità di 
output dalla seconda istruzione EXEC. 

ba MIM 

il sistema entra in BASIC. 

EXEC "vi 1 : ,+dprt ; " KJ 

L'istruzione EXEC provoca la visualizzazio¬ 
ne e la stampa della directory del dischet¬ 
to inserito nel drive 1. 

SYSTEM K£| 

11 comando SYSTEM fa ritornare in PCOS e 
disabilita la stampa come unità di output. 

k 
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ba 

il sistema entra in BASIC. 

EXEC "+prt” K4:l 

L'istruzione EXEC provoca la stampa di 
quanto viene visualizzato su video (sele¬ 
zione permanente). 

SYSTEM KiLI 

11 comando SYSTEM fa ritornare in PCOS, ma 
non disabilita la stampa di quanto appare 
su video, dato che la EXEC ha fatto una 
selezione permanente. 
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11. SEGMENTAZIONE DEI PROGRAMMI 




SOMMARIO 


In questo capitolo illustreremo la tecnica di segmentazione dei 
programmi e le modalità di passaggio dei dati da un programma a un 
altro. 

Esamineremo in particolare l'istruzione CHAIN (con tutte le sue opzioni) 
e l'istruzione COMMON. Inoltre ricorderemo l’uso dei comandi RUN e LOAO 
con l'opzione R. 
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QUANDO USARE LA SEGM ENTAZ IONE DEI PROGRAMMI 

La segmentazione dei programmi significa realizzare una successione di 
programmi semplici invece di un unico programma complesso. 

Questi programmi che devono essere eseguiti uno dopo l'altro, risolvono 
lo stesso problema di un unico programma complesso. Usando questa 
tecnica, l'utente può eseguire programmi che altrimenti non potrebbero 
essere caricati nella memoria dell'M20: la segmentazione dei programmi è 
una tecnica che può essere utile anche in molti altri casi, alcuni dei 
quali sono indicati nella seguente tabilla. 


SE... 

ALLORA... 

un programma non può essere con¬ 
tenuto nella memoria disponibile 

è necessario, per poterlo esegui¬ 
re, suddividerlo in due o più 
programmi più semplici, da esegui¬ 
re in tempi successivi 

un programma contiene delle parti 
che vengono eseguite raramente 

può essere opportuno codificare 
queste parti come programmi di¬ 
stinti da richiamare in memoria 
quando necessario 

un programma ha una parte che deve 
essere sempre residente, mentre 
altre parti possono risiedere in 
memoria temporaneamente (tipi¬ 

camente queste parti sono routine 
standard che possono essere utiliz¬ 
zate da molti programmi) 

può essere opportuno codificare 
queste parti come programmi di¬ 
stinti: il segmento che deve 
essere sempre residente ("radice") 
richiamerà in memoria per l'esecu¬ 
zione il primo segmento transiente 
(overlay). 11 secondo overlay 
verrà quindi richiamato in memoria 
o dal primo overlay o dalla stessa 
radice. 

Ognuno di questi overlay verrà 
ricoperto (tutto o in parte) dal 
successivo 

un programma è decomponibile in 
parti funzionali distinte 

può essere opportuno codificare 
queste parti come programmi di¬ 
stinti al fine di ridurre i costi 
di programmazione 















TRASFERIMENTO DATI 


La segmentazione dei programmi comporterà la necessità di trasferire 
dati da un programma al successivo. Ciò può essere fatto in vari modi, 
come indicato dalla seguente tabella. 


SE si utilizza... 

ALLORA... 

CHAIN insieme a 
una o più istruzio¬ 
ni COMMON 

il BASIC crea un'area "common" che non viene 
ricoperta dal programma concatenato (il program¬ 
ma residente in memoria viene invece ricoperto). 

L'area "common" contiene tutte le variabili 
specificate nell'istruzione COMMON; il programma 
concatenato può accedere a queste variabili. 

CHAIN con l'opzio¬ 
ne ALL 

tutte le variabili definite dal programma resi¬ 
dente in memoria, vengono trasferite al program¬ 
ma concatenato. 

CHAIN e il pro¬ 
gramma attuale accede 
ad uno o più file 
dati 

il trasferimento dei dati può avvenire anche 

tramite l'utilizzo di questi file. 

L'istruzione CHAIN non chiude i file dati. 

L'utilizzo dei file dati è compatibile con: 

- le istruzioni CHAIN e COMMON 

- l'istruzione CHAIN con l'opzione ALL 

- l'istruzione CHAIN con l'opzione MERGE (ed 
eventualmente DELETE - vedere la spiegazione 
dell'opzione DELETE più avanti in questo 
capitolo). 

RUN o LOAD con 
l'opzione R, e il 
programma attualmente 
in memoria accede 
a uno o più file 
dati 

il trasferimento dati avviene tramite l'utilizzo 
di questi file. 1 commandi RUN o LOAD con 
l'opzione R non chiudono i file dati. 
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CONCATENAMENTO DEI PROGRAMMI 

Come abbiamo già visto, la segmentazione dei programmi può essere 

realizzata tramite: 

- le istruzioni CHAIN e COMMON 

- i comandi RUN e LOAD 

L'istruzione CHAIN, con tutte le sue opzioni, fornisce un mezzo potente e 

flessibile per la segmentazione dei programmi. 

L'istruzione CHAIN può essere utilizzata secondo tre modalità distinte: 

- insieme a una o più istruzioni COMMON, in modo da trasferire l'area 
common al programma concatenato 

- con l'opzione MERGE per poter inserire il programma concatenato nel 
programma residente in memoria (l'opzione DELETE viene spesso usata in 
questo caso per cancellare una parte del programma a fine esecuzione, 
consentendo così di eseguire una serie di "overlay") 

- con l'opzione ALL per passare tutte le variabili al programma con¬ 
catenato 


CHAIN (PROGRAMMA) 


Consente di concatenare il programma specificato a quello attualmente in 
memoria permettendo il trasferimento delle variabili. CHAIN lascia i file 
dati aperti e conserva il valore iniziale dell'indice (0 oppure 1) degli 
elementi delle matrici. 



line 

number 


Figura 11-1 Istruzione CHAIN 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


MERGE 


viene eseguita un'operazione di MERGE tra il 
programma attualmente in memoria e il programma 
concatenato. Quest'ultimo deve essere stato 
registrato su disco in formato ASCII. 


Se l'opzione MERGE viene omessa, il programma 
attualmente in memoria viene ricoperto dal 
programma concatenato (ad esclusione dell'even¬ 
tuale area "common"). 


MERGE viene spesso usata con l'opzione DELETE e 
line number expression per eseguire una sequenza 
di "overlay" (v. Esempi). 


Nota : l'opzione MERGE non modifica i tipi delle 
variabili. Le variabili definite nel programma 
concatenante possono quindi essere usate nel 
programma concatenato. Le funzioni definite 
dall'utente invece resteranno indefinite dopo che 
l'operazione di MERGE è stata ultimata. 


file identifier 


è un'espressione stringa 
programma da concatenare 


che specifica 


il 


line number expres¬ 
sion 


può essere un numero di linea o una espressione 
il cui valore rappresenta un numero di linea del 
programma concatenato. 


Questo parametro individua la linea del program¬ 
ma concatenato che viene eseguita per prima. 
Questo parametro viene spesso usato insieme con 
MERGE e DELETE per eseguire una sequenza di 
overlay. Se questo parametro è omesso, il 
programma concatenato viene eseguito a partire 
dall'inizio. 


Nota : 11 comando RENUM non modifica il valore di 
questo parametro 

--► 
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ALL 


se l'istruzione CHAIN comprende l'opzione ALL, i 
valori di tutte le variabili del programma 
attualmente in memoria, vengono trasferiti al 
programma concatenato. 


Se l'opzione ALL non viene specificata, i dati 
vengono trasferiti tramite l'area "common" e/o 
tramite l'uso di file dati. 


DELETE 


specifica (tramite numeri di linea) che una 
sezione del programma attualmente in memoria 
deve essere cancellata. 


La cancellazione avviene prima che il programma 
concatenato sia caricato in memoria. 


DELETE è spesso usato insieme con MERGE e line 
number expression per eseguire una sequenza di 
"overlay". 

Nota : 1 numeri di linea usati dopo DELETE 
vengono modificati se si esegue un comando 
RENUM. 


Esempi 


VIDEO 

10 REM PR0G1 
20 COMMON Al ,B1,C1$ 


COMMENTI 


il programma PR0G1 concatena il 
programma PR0G2 e trasferisce a 
PR0G2 i valori Al,B1,CI $ (tramite 
l'uso di un’area "common"). 


100 CHAIN "PR0G2" 
110 END 


PR0G2 risiede sul disco inserito 
nell'ultima unità selezionata. 


► 












10 REM PR0G2 

20 COMMON A2$, B2$ 

il programma PROG2 concatena PROG3 
e trasferisce a PROG3 i valori di 
A2$ e B2$ (tramite l'uso di 
un'area "common"). 

80 CHAIN ”PROG3",200 

90 END 

Il programma PR0G3 viene eseguito 
a partire dalla linea 200. 

PR0G3 risiede sul disco inserito 
nell'ultima unità selezionata. 

10 REM PROG10 

il programma PROG10 concatena 
PROG11 e trasferisce a questo 
tutte le sue variabili. 

50 CHAIN "1:PROG11", 100, ALL 

60 END 

PR0G11 viene eseguito a partire 
dalla linea 100. 

PR0G11 risiede sul dischetto inse¬ 
rito nell'unità 1. 

10 REM ROOT 

il programma ROOT concatena con 
l'opzione MERGE il programma 
0VERLAY1 (registrato in formato 
ASCII sul disco VI). 

100 CHAIN MERGE "VI:OVERLAY1", 1000 
110 END 

Questo viene eseguito a partire 
dalla linea 1000 

1000 REM OVERLAY1 

il programma 0VERLAY1 concatena 
con l'opzione MERGE il programma 
0VERLAY2 (registrato in formato 
ASCII sul disco VI). 

1500 CHAIN MERGE "VI:OVERLAY2", 

1000, DELETE 1000-1500 

1510 END 

Questo viene eseguito a partire 
dalla linea 1000. Prima del suo 
caricamento però le istruzioni 
dalla linea 1000 alla 1500 vengono 
cancellate 
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SEGMENTAZIONE DEI PROGRAMMI 


COMMON (PROGRAMMA) 


Definisce un'area common che non viene ricoperta dal programma concate¬ 
nato e permette il trasferimento delle variabili. 



Figura 11-2 Istruzione COMMON 

Esempi 


VIDEO 


COMMENTI 


10 REM PG1 

20 COMMON Al,B1,C1,D1$ 


Le istruzioni COMMON vengono usate 
all'istruzione CHAIN. 


unitamente 


80 CHAIN "V0L2:PG2" 
90 END 

10 REM PG2 

20 PR1NT Al,B1,C1,D1$ 


Un programma può avere una o più istruzione 
COMMON. 

le variabili specificate in queste istruzioni 
vengono allocate nell'area common a partire 
dall'inizio dell'area e secondo la sequenza di 
scrittura nel programma. 


120 END 


11 programma concatenato non deve necessa¬ 
riamente specificare, tramite istruzioni COMMON, 
le variabili COMMON specificate dal programma 
concatenante. 

11 programma concatenato farà riferimento a 
qjeste variabili usando gli stessi nomi indicati 
nel programma concatenante. 
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Nel nostro esempio i valori delle variabili 
A1,B1,C1 e DI $ del programma PG1 vengono 
trasferiti al programma concatenato PG2, che ne 
visualizza i valori (vedi istruzioni 20). 

10 REM PG1 

20 DEFDBL C 

30 COMMON Al ,81 ,C1 ,01$ 

Eventuali istruzioni di definizione di tipo 
(DEFINT, DEFSNG, DEFDBL, DEFSTR) relative a 
variabili common devono precedere le istruzioni 
COMMON e dovranno apparire anche nel programma 
concatenato in modo da conservare la coerenza 

90 CHAIN "V0L2:PG2” 

100 END 

dei tipi delle variabili. Si noti in questo caso 
la presenza delle due istruzioni DEFDBL nei due 
programmi PG1 e PG2 

10 REM PG2 

20 DEFDBL C 


130 END 


10 REM PR0GRAM1 

20 COMMON A$,B$,C$ 

30 COMMON A$,Al 

E'buona norma di programmazione non scrivere uno 
stesso nome di variabile (in questo caso A$) in 
istruzioni COMMON diverse nell’ambito dello 
stesso programma (né più di una volta in una 
stessa istruzione COMMON). 

100 END 

In ogni caso le definizioni multiple sono 
equivalenti a una sinqola. 

10 REM PG1 

20 DIM Al(15,20) 

30 COMMON A1(),B1 ,C1 

un'istruzione COMMON può specificare anche noni 
di matrici. In tal caso questi nomi devono 
essere seguiti da una coppia di parentesi. Ogni 
matrice indicata in una istruzione COMMON deve 

100 CHAIN "V0L2:PG2" 
110 END 

10 REM PG2 

anche essere dimensionata tramite un'istruzione 
DIM nel programma concatenante (ma non nel 
programma concatenato, altrimenti si verificherà 
un errore "Duplicate Definition in line..."). 

L'istruzione DIM deve precedere l'istruzione 

50 PRINf Al (1,1) 

COMMON associata. 

90 END 
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SEGMENTAZIONE DEI PROGRAMMI 


10 REM modi 

20 A=1:B=2 

30 COMMON A,B 

40 GOTO 60 

50 COMMON C 

60 CHAIN "mod3" 

l’istruzione COMMON ha un valore dichiarativo 
efficace anche se non viene eseguita. Quando si 
esegue "modi" si ha "lllegal function cali in 
50" perché la variabile C non è definita. 

Eseguendo invece "mod2", viene chiamato il 

10 REM mod2 

20 A=1:B=2 

30 COMMON A 

40 GOTO 60 

50 COMMON B 

60 CHAIN "mod3" 

programma "mod3" che visualizza sia la variabile 
A che la variabile B, anche se la linea 50 di 
"mod2" è stata "saltata". 

10 REM mod3 

20 PRINT A;B 



Nota 


Le variabili common devono essere inizializzate nel programma concate¬ 
nante. 












































12. GESTIONE DI UN FILE SU DISCO 
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GESTIONE DI UN FILE SU DISCO 


FILE SEQUENZIALI E AD ACCESSO DIRETTO 


Un file dati viene creato (cioè reso noto al sistema) tramite: 

- il comando FNEW del PCOS, che ne stabilisce il nome e l'estensione 
iniziale, 

oppure 

- l'istruzione OPEN, che consente di accedere al file da programma. 

L'istruzione OPEN attribuisce anche il nome a un file che non sia già 
stato creato tramite FNEW o un'altra OPEN. In ogni caso OPEN associa un 
buffer dati al file (utilizzato dal programma per ogni operazione di 
Input/Output) e specifica il metodo d'accesso. 

Useremo il comando FNEW invece dell'istruzione OPEN per creare un file 
dati molto esteso di cui si conosca sufficientemente bene la dimensione 
finale. FNEW riserva un certo numero di settori contigui su disco al 
file. Ciò può rendere più efficienti le operazioni di Input/Output. 
Inoltre FNEW garantisce che ci sia spazio sufficiente a contenere il file 
su disco. 

Dal punto di vista implementativo esiste un solo tipo di file (byte 
stream); ogni file può però essere aperto secondo quattro diversi metodi 
d'accesso (Input, Output, Append e Random). I primi tre permettono un 
accesso di tipo sequenziale (si parla quindi di file sequenziali), mentre 
l'ultimo ammette esclusivamente l'accesso random (si parla quindi di file 
ad accesso diretto). Il metodo d'accesso di un file può essere modificato 
ogni volta che il file viene riaperto. 

La seguente tabella riassume le caratteristiche fondamentali dei file 
dati, classificando i file (dal punto di vista utente) in due categorie: 
sequenziali e ad accesso diretto. 
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TIPO DI FILE 

CARATTERISTICHE 

METODO D'ACCESSO 

Sequenziale (o 
"Stream-oriented") 

un file sequenziale è 
una sequenza di carat¬ 
teri ASCII senza alcun 
criterio di raggruppa¬ 
mento. Il numero di da 
ti letti o registrati 
in ogni operazione di 
Input/Output può varia 
re ed è di norma deter 
minato dal numero di 
variabili specificate 
nell'istruzione 

Input: lettura sequen¬ 
ziale (un dato dopo 
l'altro) dall'inizio 
del file 

Output: registrazione 
sequenziale dall'ini¬ 
zio del file. I dati 
presenti precedente- 
mente sul file sono 
persi 

Append: registrazione 
sequenziale dalla fine 
del file preesistente. 

1 dati presenti nel 
file non sono persi. 

Ad Accesso Diretto 
(o "Record-oriented") 

Un file ad accesso di¬ 
retto è una sequenza di 
dati raggruppati in 
record. 

Ogni istruzione di 
Input/Output può legge¬ 
re o registrare un re¬ 
cord alla volta. 

1 record di un file 
ad accesso diretto 
hanno tutti la stessa 
lunghezza e la stessa 
struttura. 

Random: 

accesso diretto in 
lettura o registrazio¬ 
ne al record specifi¬ 
cato. 


FILE SEQUENZIALI 

1 file sequenziali rappresentano il modo più semplice di memorizzare i 
dati. 

Conviene utilizzare file sequenziali quando i dati hanno un formato 
libero (cioè non si possono raggruppare in record). 

I dati vengono scritti su un file sequenziale uno dopo l'altro (in 
sequenza) e vengono poi letti nello stesso ordine. Si tengano presenti i 
seguenti punti: 
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GESTIONE DI UN FILE SU DISCO 


- quando un file sequenziale viene aperto in - Output, i dati vengono 

registrati in sequenza a partire dall'inizio del file. Se il file 
conteneva in precedenza dei dati, questi vengono persi. 

- quando un file sequenziale viene aperto in Append, i dati vengono 

registrati in sequenza dopo l'ultimo dato sul file. 

- per aggiornare un file sequenziale è necessario aprirlo in lettura 
(Input), leggerne i dati, aggiornarli e riscriverli su un nuovo file 
sequenziale aperto in scrittura (Output). 

- i dati scritti su un file sequenziale includono di norma dei delimitato 
ri che specificano dove ogni dato inizia e finisce. 

- per leggere un file sequenziale l'utente deve aprirlo in Input e deve 
conoscere il formato dei suoi dati; per esempio se sul file sono 
memorizzati valori numerici separati da spazi o valori numerici e 
stringa separati da virgola. 

- i dati su un file sono sempre registrati come una stringa di caratteri 
(un byte per ogni carattere del dato). Per esempio il numero: 

351.27 

richiede 6 byte di memoria su disco, esclusi i delimitatori (che 
possono essere spazi o virgole). 


FILE AD ACCESSO DIRETTO 

Conviene utilizzare file ad accesso diretto quando è possibile raggrup¬ 
pare i dati in "record", aventi tutti una data lunghezza. 

1 file ad accesso diretto richiedono un maggior numero di passi di 

programma che non i file sequenziali, ma presentano vari vantaggi: 

- invece di iniziare a leggere o a scrivere un file dall'inizio, l'utente 
può leggere o scrivere un record qualsiasi del file. 

- per aggiornare un file, non è necessario leggere l'intero file, 
aggiornare i suoi dati e scriverli su un altro file. L’utente può 
riscrivere o aggiungere un qualsiasi record senza dover accedere a 
tutti i record precedenti. 

- l'apertura di un file ad accesso diretto consente sia di scrivere che 
di leggere record dal file utilizzando lo stesso "buffer" per entrambe 
le operazioni. 
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APERTURA E CHIUSURA DI UN FILE 


Per accedere a un file dati da programma, l'utente deve aprirlo tramite 
un'istruzione OPEN. Questa specifica l'identificatore di un file, il 
metodo d'accesso, il numero dei file e, limitatamente ai file ad accesso 
diretto, la lunghezza dei record. 

11 massimo numero di file aperti contemporaneamente può essere stabilito 
tramite il comando SBASIC del PCOS, o può essere assunto per default (in 
quest'ultimo caso il suo valore è 3). Il numero massimo non può mai 
superare 15. 

Ogni volta che l'utente apre un file, un buffer viene associato al file. 
Ogni buffer ha un numero compreso tra 1 e 15. 11 numero di buffer viene 
anche detto numero di file; esso viene usato in ogni operazione di I/O 
per far riferimento al file preceduto dal simbolo # (che è però opzionale 
in alcune istruzioni). 11 buffer è un'area di transito per i dati che 
devono essere letti o scritti su file. 

Per i file ad accesso diretto, l'utente deve stabilire la struttura del 
buffer (cioè dei record nel file) fissando la lunghezza (in caratteri) di 
ogni dato all'interno del buffer tramite l'istruzione F1ELD. 

L'utente per accedere a un dato file con un'istruzione di input/output, 
farà riferimento al file tramite il numero del file e non tramite il suo 
identificatore. 

Quando l'utente chiude un file, tramite l'istruzione CLOSE, viene can¬ 
cellata l'associazione, fatta dalla OPEN, tra il file e il buffer, e non 
è più possibile accedere al file, a meno che non venga aperto di nuovo. 
Quando l'utente riapre un file, tramite un'altra OPEN, può associare al 
file lo stesso o un altro buffer. 


OPEN (PROGRAMMA/IMMEDIATO) 


Apre un file dati consentendo l'accesso da programma. 

Se il file non è già stato creato la OPEN crea anche il file (però 
l’utente non può creare un file aprendolo con metodo d'accesso "1") 



Figura 12-1 Istruzione OPEN 
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Dove 


ELEMENTO 01 SINTASSI 

SIGNIFICATO 

access mode 

è una costante o una variabile stringa il cui 

valore può essere: 

- ”A",cioè Append : predispone la registrazione 
sequenziale dei dati dopo l'ultimo dato. 11 
file è sequenziale. 1 dati presenti sul file 
non vengono persi, i nuovi dati vengono 
aggiunti di seguito a quelli esistenti 

- "I" cioè Input : predispone la lettura 
sequenziale dei dati a partire dall'inizio dal 
file. 11 file è sequenziale 

- "0" cioè Output : predispone la registrazione 
sequenziale dei dati a partire dall'inizio del 
file. 11 file è sequenziale. Se il file 
conteneva già dei dati questi vengono persi. 

- "R" cioè Random : i record potranno essere 
letti o scritti in qualsiasi ordine. In questo 
caso il file è ad accesso diretto. 

N.B. Se un file sequenziale è vuoto (cioè non 
contiene dati) i metodi di accesso A e 0 
sono equivalenti 

file number 

è una espressione numerica, il cui valore 
(arrotondato all'intero più vicino) deve essere 
compreso tra 1 e 15. 

11 numero di file specificato rimane associato 
al file per tutto il tempo in cui il file resta 
aperto e viene usato per specificare il file in 
ogni istruzione di I/O 

file identifier 

è una costante o una variabile stringa e può 
specificare: 

- un file nuovo (cioè sconosciuto al sistema). 

In questo caso il file viene creato (ad 
esclusione dei file aperti con metodo d'acces¬ 
so "1"). 

- un file già esistente. In questo caso il file 
viene soltanto aperto. 
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record length 


è un'espressione numerica (arrotondata all'in¬ 
tero più vicino) che, se specificata, stabilisce 
la lunghezza dei record di un file ad accesso 
diretto. 

Questo parametro può essere specificato solo per 
i file ad accesso diretto. 11 suo valore di 
default è 256 byte.11 suo valore massimo è dato 
dal parametro record size del comando SBASIC del 
PCOS. 1 valori ammessi del record size vanno da 
1 a 4096 (con un valore di default di 256 
bytes). 


Esempi 


VIDEO 


COMMENTI 


50 OPEN "A",1,"V1:EXAMPLE" 


160 OPEN "0",2,"VI:TEST" 


270 OPEN "R",3,”V2:F1”,80 
280 OPEN "R",4,"V2:F2",20 


490 CLOSE 2 

500 OPEN "1",5,"V1:TEST" 


600 OPEN ”R",2,F1LE$,RN 


L'istruzione 50 apre il file sequenziale 
EXAMPLE residente sul disco VI in Append, e 
associa al file il buffer numero 1. 
L'istruzione 160 apre il file sequenziale 
TEST, residente sul disco VI, in Output e 
associa al file il buffer numero 2. 
L'istruzione 270 apre il file ad accesso 
diretto FI, residente sul disco V2, associa 
al file il buffer numero 3 e stabilisce la 
lunghezza dei record pari a 80 byte. 
L'istruzione 280 apre il file ad accesso 
diretto F2, residente sul disco V2, associa 
al file il buffer numero 4 e stabilisce la 
lunghezza dei record pari a 20 byte. 
L'istruzione 490 chiude il file TEST. 
L'istruzione 500 riapre il file TEST in 
Input e associa al file il buffer numero 5. 
L'istruzione 600 apre un file ad accesso 
diretto il cui identificatore è il contenu¬ 
to della variabile stringa F1LE $. La 
lunghezza dei suoi record è data dal valore 
della variabile numerica RN. 11 buffer 
associato è il buffer 2 reso disponibile 
dopo l'istruzione 490. 
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Nota 

Non è possibile creare un file con un'istruzione OPEN, se viene 
specificato come metodo di accesso "1". Un eventuale tentativo si risolve 
in un errore per "File not found" 


CLOSE (PR0GRAMMA/1MMED1AT0) 


Chiude i file dati 



Figura 12-2 Istruzione CLOSE 


Dove 


ELEMENTO 01 SINTASSI 


SIGNIFICATO 

file number 


è un’espressione numerica il cui valore arroton¬ 
dato rappresenta il numero del buffer associato 
al file. Questo numero deve essere compreso tra 
1 e 15. Un'istruzione CLOSE senza parametri 
chiude tutti i file che erano stati aperti. 
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Esempi 


VIDEO 


COMMENTI 


170 CLOSE # 2 
250 A=6 

290 CLOSE 3,5,A 

1200 CLOSE 


L'istruzione 170 chiude il file associato al 
buffer numero 2. 

L'istruzione 290 chiude i file associati ai 
buffer numero 3,5 e 6 (se A vale 6). 

L'istruzione 1200 chiude tutti i file. 


Caratteristiche 


SE... 

ALLORA... 

viene eseguita un'istru¬ 
zione CLOSE 

l'associazione tra il file che è stato chiuso 
e il suo buffer viene annullata; il buffer 
può allora essere riutilizzato per aprire 
qualsiasi file. 

Un file che è stato chiuso può essere 
riaperto tramite una istruzione OPEN (nel¬ 
l'ambito dello stesso o di un altro program¬ 
ma). La OPEN può associare al file qualsiasi 
buffer che in quel momento sia libero 

viene eseguita una un'i¬ 
struzione END o un coman¬ 
do SYSTEM 

tutti i file aperti vengono chiusi 

l'utente imposta 

tutti i file aperti vengono chiusi e tutti i 
dati nei buffer di 1/0, non ancora registrati 
su disco, vengono persi 
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viene fatta una qualsiasi 
modifica al programma 
(inserimento, modifica 
di linee etc...) 


tutti i file aperti vengono chiusi 

viene eseguita una istru¬ 
zione CHAIN, oppure un 
comando LOAD (o RUN) con 
l'opzione R 


nessun file viene chiuso 

si ha un'interruzione del 
programma (a seguito di 
una istruzione STOP, di 
un messaggio d'errore, 
dell'impostazione di 

HI) 


nessun file viene chiuso 

si cerca di chiudere un 
file già chiuso o non 
ancora aperto 


l'istruzione non ha effetto 


Note 

E' sempre conveniente chiudere un file quando non si ha più bisogno di 
elaborarlo, a meno di dover concatenare un altro programma al programma 
attuale (tramite CHAIN o RUN con l'opzione R o LOAD con l'opzione R) per 
accedere allo stesso file con lo stesso metodo di accesso. 

Un comando LOAD oppure RUN (senza l'opzione R) oppure un comando SAVE, 
chiudono tutti i file che sono ancora aperti. 


SCRITTURA DI UN FILE SEQUENZIALE 


11 file deve essere aperto con metodo d’accesso Output ("0") o Append 
("A") 


Le istruzioni di Output sono PRINT# , PR1NT# US1NG e URITE#. PRINT# e 
URITE# scrivono i dati in un formato standard, mentre PRINT# US1NG 
scrive i dati in un formato definito dall'utente. La differenza tra 
PRINT # e URITE # è che: 
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- PR1NT # registra su disco i dati nello stesso formato standard col 

quale l'istruzione PR1NT li visualizza su video. 

- URITE # registra su disco i dati nello stesso formato standard col 

quale l'istruzione URITE li visualizza, cioè inserisce una virgola tra 
un dato e il successivo ed inoltre registra il carattere virgolette 
davanti e alla fine di ogni valore stringa. 

Nota : Può essere usata la funzione LOC per sapere il numero di settori 
(blocchi di 256 byte) registrati nel file da quando è stato aperto, al 
fine di evitare il messaggio d'errore "Disk full" 

1 seguenti passi di programma sono necessari per scrivere dati su un file 
sequenziale. 


PASSO 

AZIONE 

ESEMPI 

1 

L'utente deve aprire il file 
specificando il metodo d'acces¬ 
so "0" oppure "A" 

10 OPEN "0",1,"1: FI" 

2 

L'utente deve scrivere una serie 
di valori numerici e/o stringa 
sul file, usando delle istruzioni 
di Output 

50 URITE# 1 ,A$,B,C$ 

3 

L'utente deve ripetere il 
passo 2 per ogni operazione 
di Output 

150 URITE #1,Al,B1,C1$ 



180 URITE# 1,A2,B2$,C2,02 
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GESTIONE DI UN FILE SU DISCO 


4 Quando non ci sono più dati da re¬ 

gistrare, l'utente deve chiudere il 
file (a meno che non debba essere 
riutilizzato con lo stesso me- 300 CL0SE#1 

todo d'accesso da un altro pro¬ 
gramma concatenato al precedente) 


PR1NT # (PROGRAMMA/IMMEDIATO) 


Registra dati su un file sequenziale, usando lo stesso formato standard 
utilizzato da un'istruzione PRINT. 



Figura 1Z-3 Istruzione PRINT# 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
file. 

expression 

può essere un'espressione numerica, di relazio¬ 
ne, logica o stringa, il cui valore viene 
registrato sul file. 





























Note 


Poiché i dati vengono registrati su disco nello stesso formato in cui 
apparirebbero su video con l'istruzione PR1NT, l’utente deve fare 
attenzione a registrare i dati con gli opportuni delimitatori in modo da 
poterli poi rileggere in modo corretto. 

Caratteristiche 


SE... 

ALLORA... 

viene eseguita un'istru¬ 
zione PRINT# 

i dati vengono registrati in modo sequenziale 
sul file specificato 

il file viene aperto 
in Output ("0") 

il pointer viene posto all'inizio del file, 
quindi la prima PR1NT# registra i dati a 
partire dall'inizio del file 

Ad ogni operazione PR1NT# ,il pointer avan¬ 
za, sicché i valori vengono registrati in 
sequenza 

il file viene aperto in 
Append ("A") 

il pointer è posto alla fine, quindi la prima 
PRINT # registra i dati dopo l'ultimo dato 
presente nel file. Ad ogni operazione 
PRINT # il pointer avanza, sicché i valori 
sono registrati in sequenza 

l'utente vuole scrivere 
correttamente la lista 
PR1NT # per leggere poi 
i dati registrati tramite 
una o più istruzioni 

INPUT# 

deve tener presente che un'istruzione 
PRINT # crea una stringa su disco simile a 
quella che crea una PRINT sul video 

PRINT# registra una stringa di dati codifi¬ 
cata ASCII. La punteggiatura nella lista 
PRINT# è molto importante 


La virgola e il punto e virgola non racchiusi 
tra virgolette hanno lo stesso effetto di 
quando sono presenti nelle istruzioni PRINT 
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GESTIONE DI UN FILE SU DISCO 


l'utente vuole registra¬ 
re dei valori numerici 
(che possono essere cioè 
il risultato di una 
espressione numerica o 
di relazione o logica) 


deve separare le espressioni con una virgola 
o un punto e virgola. 

Se non vuole perdere spazio su disco deve 
usare il punto e virgola anziché la virgola 

Per esempio: 

LIST 

10 OPEN "0", #1 ."DATAI" 

20 A=1:B=2:C=3 
30 PR1NT #1,A;B;C 
40 CLOSE# 1 

50 OPEN "1”, #1,"DATAI” 

60 INPUT #1, Al, B1, CI 

70 PR1NT Al;B1;C1 

80 CLOSE #1 

90 END 

Ok 

RUN 

1 2 3 

Ok 

30 PR1NT#1,A,B,C 
RUN 

1 2 3 

Ok 

Se l'utente separa le variabili numeriche A.B 
e C nell'istruzione 30 con virgole anziché 
punti e virgola, il risultato è esattamente 
lo stesso, ma spreca spazio su disco dato che 
vengono inseriti spazi addizionali tra le 
variabili 

Con il punto e virgola, la stringa su disco 
sarà: 

1 2 3 

con la virgola, sarà: 

1 2 3 

► 













l'utente vuole regi¬ 
strare valori stringa 

deve inserire, in modo esplicito, dei delimita¬ 
tori se vuole leggere quei valori come stringhe 
distinte (tramite la INPUT # ) 

l'utente vuole regi¬ 
strare dei valori 
stringa che non con¬ 
tengono virgole, pun¬ 
ti e virgola, spazi 
iniziali e finali si¬ 
gnificativi, ritorno 
a capo o interlinee 

deve usare una virgola, espressa come costante 
stringa per separare le espressioni 

stringa nella PR1NT # . In questo modo anche i 
dati su disco verranno separati con una virgola 
e potranno quindi essere riletti come stringhe 
distinte tramite un'istruzione INPUT# 

Per esempio: 

LIST 

10 OPEN "0", #1 ."DATAI" 

20 A$="CAMERA" 

30 B$="93605-2" 

40 PR1NT#1,A$;B$ 

50 CLOSE #1 

60 OPEN "1", #1,"DATAI" 

70 INPUT #1, Al $ 

80 PR1NT Al $ 

90 CLOSE #1 

100 END 

Ok 

RUN 

CAMERA93605-2 

Ok 

40 PR1NT#1,A$;",";B$ 

70 INPUT #1,Al $,B1$ 

80 PR1NT A1$,B1$ 

RUN 

CAMERA 93605-2 

Ok 

Se l'utente separa A$ e B$ con un punto e 
virgola nell'istruzione 40, la stringa di 
caratteri registrata su disco sarà: 

CAMERA93605-2 

Poiché non ci sono dei delimitatori, questa 
stringa non può essere riletta come due stringhe 
distinte. Per poter fare ciò, bisogna inserire, 
in modo esplicito, un delimitatore (",") nell'i¬ 
struzione 40 e correggere in conseguenza anche 
le istruzioni 70 e 80. 

La stringa registrata su disco sarà allora: 
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GESTIONE DI UN FILE SU DISCO 


CAMERA,93605-2 

Questa stringa verrà letta come due stringhe 
separate (vedi la seconda esecuzione del pro¬ 
gramma) 


l'utente vuole regi¬ 
strare dei valori 
stringa che conten¬ 
gono virgole , punti 
e virgola, spazi ini¬ 
ziali o finali si¬ 
gnificativi, ritorni 
a capo o interlinee 


deve separare le espressioni stringa con un 
carattere virgolette ("), espresso come funzione 
CHR$(34) 

Per esempio: 

LIST 

10 OPEN "0", #1, "DATAI " 

20 A$="CAMERA, AUTOMATIC" 

30 B$=" 93605-2" 

40 PR1NT #1,A$;B$ 

50 CLOSE #1 

60 OPEN "1",# 1,"DATAI" 

70 INPUT #1,A$,B$ 

80 PR1NT A$;B$ 

90 CLOSE #1 
100 END 
Ok 
RUN 

CAMERAAUTOMATIC 93605-2 
Ok 

40 PR1NT#1,CHR$(34);A$;CHR$(34);CHR$(34); 

B$;CHR$(34) 

RUN 

CAMERA, AUTOMATIC 93605-2 
Ok 


L'istruzione 40 registra su disco la seguente 
stringa: 

CAMERA, AUTOMATIC 93605-2 
e l'istruzione 70 assegna la stringa 
CAMERA 


alla variabile A$ e la stringa 
AUTOMATIC 93605-2 

alla variabile B$. Questo si può verificare tra¬ 
mite l'istruzione 80 quando si esegue il pro- 
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gramma per la prima volta. Se l'utente modifica 
l'istruzione 40 come indicato, la stringa regi¬ 
strata su disco sarà: 

"CAMERA, AUTOMATIC"" 93605-2" 

e l'istruzione 70 assegnerà la stringa: 

"CAMERA, AUTOMATIC" 

alla variabile A$ e la stringa: 

" 93605-2" 

alla variabile B$. Questo si può verificare con 
l'istruzione 80, quando si esegue il programma 
per la seconda volta. 


PR1NT# US1NG (PROGRAMMA/IMMEDIATO) 


Registra dati su un file sequenziale, usando un formato definito 
dall'utente allo stesso modo di un'istruzione PRINT USING che però visua¬ 
lizza l'output sul video. 



Figura 12-4 Istruzione PRINT # USING 
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GESTIONE DI UN FILE SU DISCO 


Dove 

ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un’fespressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
file 

string expression 

è la formattazione dei caratteri descritta 
dettagliatamente nel capitolo 7 

expression 

può essere un’espressione numerica, di relazio¬ 
ne, logica o stringa, il cui valore viene regi¬ 
strato sul file 


Note 

L'utente deve aver cura di registrare i dati con gli opportuni delimita¬ 
tori in modo da poterli poi rileggere in modo corretto con un’istruzione 
INPUT#. 

Per esempio, l'istruzione: 

PR1NT# 1 ,US1NG"#### ,##, A, B,C,0 

può essere usata per registrare dati numerici senza delimitatori espli¬ 
citi. La virgola al termine della stringa di formato serve a separare i 
dati sul file. 

Si veda il capitolo 7 per maggiori dettagli sulle prestazioni offerte 
dall'istruzione PRINT USING 


URITE# (PROGRAMMA/IMMEDIATO) 


Registra dati su un file sequenziale, usando lo stesso formato utilizzato 
dall'istruzione URITE sul video. Ogni dato viene separato dal precedente 
tramite una virgola. Le stringhe vengono delimitate dal carattere virgo- 
lette ("). Dopo la registrazione dell'ultimo dato della lista, il BASIC 
introduce un ritorno a capo/interlinea. 
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Figura 12-5 Istruzione URITE# 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il 
dato specifica il numero del 
file 

cui valore arroton- 
buffer associato al 

expression 

può essere un’espressione numerica, di relazio¬ 
ne, logica o stringa, il cui valore viene 
registrato sul file 


Note 

Non è necessario inserire dei delimitatori espliciti nella lista di 
un'istruzione WR1TE #. 

Se l'utente vuole registrare una stringa che contiene il carattere vir¬ 
golette ("), deve usare l'istruzione PR1NT invece dell'istruzione 
WR1TE # . 

11 carattere virgolette (") può essere inserito all'interno di un valore 
stringa tramite la funzione CHR$(34), purché il valore stringa non 
contenga virgole, punti e virgola, spazi iniziali e finali significativi, 
ritorni a capo e interlinee. 

Un carattere virgolette (") può anche appartenere al valore stringa 
memorizzato in una variabile stringa, se detto valore viene assegnato 
tramite istruzioni READ e DATA o istruzioni INPUT (LINE INPUT, INPUT#, o 
LINE INPUT #). 
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GESTIONE DI UN FILE SU DISCO 


Esempio 


VIDEO 


COMMENTI 


LIST 

10 OPEN "0",1,"DATA2" 
20 A$="CAMERA" 

30 B$="93605-2" 

40 WRITE #1,A$,8$ 

50 CLOSE #1 

60 OPEN "1",1,"DATA2" 

70 1NPUT#1,A$,B$ 

80 WRITE A$,B$ 

90 CLOSE #1 
100 END 
OK 
RUN 


L'istruzione 40 registra la seguente stringa su 
disco: 

"CAMERA","93605-2" 

L'istruzione 70 assegna "CAMERA" alla variabile 
A$ e "93605-2" alla variabile B$. Questo si può 
verificare con l'istruzione 80 


CAMERA","93605-2' 


OK 


LOC (PROGRAMMA/1MMED1ATO) | 


Nel caso di file sequenziale, LOC ritorna il numero di settori (blocchi 
di 256 byte) letti da/registrati su file da quando è stato aperto. La 
funzione LOC può anche essere usata con file ad accesso diretto (vedi 
seguito). 



Figura 12-6 Funzione LOC 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

file number 


è un'espressione numerica arrotondata all'intero 
più vicino. Si tratta del numero del buffer 
associato al file 


Esempio 

200 IF L0C(2)> 30 THEN STOP 


LETTURA DI UN FILE SEQUENZIALE 

Per leggere un file sequenziale l'utente deve aprirlo in Input ("1"). 

Le istruzioni INPUT# e LINE INPUT# consentono di leggere dati da un 
file sequenziale. 

INPUT # legge uno o più dati, separati da delimitatori, e li assegna ad 
una lista di variabili numeriche e/o stringa. L'istruzione LINE INPUT# 
legge un'intera linea (fino al carattere ritorno a capo) e la assegna ad 
una variabile stringa. 

Oltre alle due istruzioni qui indicate, il BASIC consente di utilizzare 
due funzioni molto utili per il trattamento dei file sequenziali: 

- la funzione EOF: consente di verificare se è stata raggiunta la fine di 
un file e di evitare quindi una ulteriore lettura che darebbe luogo al 
messaggio d'errore: 

Input past end. 

- la funzione LOC : permette di conoscere il numero di settori (blocchi 
di 256 byte) che sono stati letti dal file, o scritti sul file, da 
quando è stato aperto. 

Per leggere i dati da un file sequenziale, sono richiesti i seguenti 
passi di programma: 
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GESTIONE DI UN FILE SU DISCO 


PASSO 

AZIONE 

ESEMPI 

1 

L'utente deve aprire 
il file, specificando 
”1" come metodo 
d'accesso. 

10 OPEN "1",# 2,"DATA" 

2 

L'utente può quindi leggere 
una serie di valori nume¬ 
rici e/o stringa dal file, 
utilizzando le istruzioni 

INPUT# e/o LINE INPUT# 

50 INPUT# 2,X$,Y$,Z 

3 

L'utente può continuare 
a leggere i dati, cioè 
ripetere il passo 2 per 
un numero arbitrario di 
volte (fino a raggiungere 
la fine del file) 

100 INPUT# 2,XI,X2,X3,X4 



150 INPUT# 2,U$,W$ 

4 

Quando ha finito di leggere 
i suoi dati, l'utente chiu¬ 
derà il file (a meno che 
non voglia concatenare un 
altro programma che debba 
leggere dati dal file). 

200 CLOSE # 2 


12-21 















INPUT# (PROGRAMMA/1MMED1ATO) 


Legge i dati da un file sequenziale e li assegna a variabili di program¬ 
ma. 



Figura 12-7 Istruzione INPUT# 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
file 

variable 

è il nome della variabile chr dovrà contenere un 
dato letto dal file 


Note 

A differenza dell'istruzione INPUT, l'istruzione INPUT# non visualizza 
alcun messaggio quando viene eseguita. 
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GESTIONE DI UN FILE SU DISCO 


Caratteristiche 


SE... 

ALLORA... 

viene eseguita un'istru¬ 
zione INPUT# 

i dati vengono letti dal file in sequenza, 
cioè, quando il file viene aperto, il 
"pointer" del file viene posto all'inizio del 
file. 

Ogni volta che un dato viene introdotto, il 
"pointer" si sposta all'inizio del dato 
successivo. 

Se l'utente vuole rileggere il file dall'ini¬ 
zio, deve chiudere il file ed aprirlo di 
nuovo. 

l'utente vuole leggere 
dati senza generare 
errori 

deve conoscere il tipo (numerico o stringa) 
di ogni dato sul file. 1 dati sul file 
dovranno essere separati da opportuni delimi¬ 
tatori (vedi seguito). 

Dati numerici possono essere introdotti in 
variabili stringa. 

Se l'utente introduce un numero in una 
stringa e ne vuole poi il suo valore numerico 
effettivo, dovrà usare la funzione VAL ad 
evitare errori di incompatibilità di tipo. 

il 8AS1C sta per assegna¬ 
re un dato a una variabi¬ 
le numerica 

ignora eventuali spazi iniziali, caratteri di 
ritorno a capo e interlinea. 

Quando viene incontrato il primo carattere 
diverso dai precedenti, il BASIC assume di 
aver incontrato il primo carattere di un 
numero. 

11 numero termina quando viene incontrato uno 
spazio, oppure un ritorno a capo o una 
interlinea o una virgola. 

N.B. Nelle assegnazioni numeriche possono 
verificarsi delle conversioni se la 
variabile è di tipo diverso dalla 
costante (così come può succedere con le 
istruzioni LET o INPUT o READ nel 
capitolo 5). 
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il BASIC sta per assegna¬ 
re un dato a una varia¬ 
bile stringa 


ignora eventuali spazi iniziali, caratteri di 
ritorno a capo e interlinea. 

Quando viene incontrato il primo carattere 
diverso dai precedenti, il BASIC assume di 
aver incontrato il primo carattere di una 
stringa. 


questo primo carattere 
è il carattere virgo- 
lette (") 


la stringa consiste di tutti i caratteri 
letti fino al successivo carattere virgolet¬ 
te. 


I caratteri virgolette non fanno parte della 
stringa (ciò significa che una stringa 
inclusa tra virgolette su disco, non può 
comprendere il carattere virgolette) 


questo primo carattere 
non è il carattere 
virgolette (") 


la stringa non è compresa tra virgolette e 
termina quando viene incontrata una virgola, 
oppure un ritorno a capo o una interlinea (o 
dopo che sono stati letti 255 caratteri). 

Per esempio, se sul disco sono presenti i 
seguenti dati: 


SUBR0UT1NES, SOTTOPROGRAMMI "COME RICHIAMAR¬ 
LI?" 


1'istruzione: 


INPUT # 1,R$,S$,T$ 
assegnerà i valori come segue: 

R$ = SUBR0UT1NES 

S$ = SOTTOPROGRAMMI "COME RICHIAMARLI ?" 

T$ = stringa nulla 

Se invece sul disco fossero presenti i 
seguenti dati: 

SUBR0UT1NES, SOTTOPROGRAMMI, "COME RICHIAMAR¬ 
LI?" 


la stessa istruzione assegnerà i seguenti 
valori : 


R$ = SUBR0UT1NES 
S$ = SOTTOPROGRAMMI 
T$ = COME RICHIAMARLI? 
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GESTIONE DI UN FILE SU DISCO 




LINE 1NPUT#(PR0GRAMMA/IMMEDIAT0) 


Legge un'intera linea (fino al carattere di ritorno a capo) da un file 
sequenziale e la assegna ad una variabile stringa 


-< 


LINE INPUT » 


file 

— 

string I 

number 


variable 1 




Figura 12-8 Istruzione LINE INPUT# 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

file number 


è un'espressione numerica il cui valore intro¬ 
dotto specifica il numero del buffer associato 
con il file 

string variable 


è il nome della variabile a cui sarà assegnata 
la linea 


Caratteristiche 


SE... 


ALLORA... 


viene eseguita un'i¬ 
struzione LINE INPUT# 


viene letta una linea di dati che viene 
assegnata alla variabile stringa specificata 


LINE INPUT# legge tutti i caratteri del file 
fino a incontrare: 


- un carattere di ritorno a capo, o 

- un carattere di ritorno a capo/interlinea, o 

- la fine del file, o 
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- il 255 m ° carattere (questo 255™ 0 carattere è 
compreso nella stringa) 

vengono incontrati 
caratteri iniziali o 
altri delimitatori - 
virgolette, virgole, 
spazi, e così via 

tutti questi caratteri iniziali o tutti questi 
delimitatori vengono inclusi nella stringa 

si vuole leggere dati 
senza seguire le nor¬ 
mali restrizioni ri¬ 
guardanti i caratte¬ 
ri iniziali e termina¬ 
li 

l'utente deve usare istruzioni LINE INPUT# 

si vuole leggere come 
un file dati un 
programma BASIC in 
formato ASCII 

l'utente deve usare istruzioni LINE INPUT# (è 
possibile registrare programmi che correggono 
altri programmi ASCII; rimunerarli, cambiare 
l'istruzione LPR1NT in PR1NT, etc...) 


Note 

LINE INPUT# legge tutti i caratteri nel file fino al carattere di 
ritorno a capo. Essa quindi salta la sequenza ritorno a capo/interlinea e 
la successiva LINE INPUT# legge tutti i caratteri fino al prossimo 
ritorno a capo (se viene incontrata la sequenza interlinea/ritorno a 
capo, essa viene considerata come facente parte della variabile stringa) 


Esempio 


VIDEO 


COMMENTI 


LIST 

10 INPUT "PROGRAM IDENT1F1ER";P$ 
20 OPEN "I",1,P$ 

30 K%=0 


Questo programma conta 
il numero delle linee 
in un file programma in 
formato ASCII. 


40 1F E0F(1) THEN 80 
50 K%=K%+1 
60 LINE INPUT# 1,A$ 
70 GOTO 40 


► 
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GESTIONE DI UN FILE SU DISCO 


80 PR1NT P$ " 1S” K% "LINES LONG" 


Ogni linea termina con 

90 CLOSE 


un ritorno a capo/in- 

100 GOTO 10 


terlinea, così la LINE 

110 END 


INPUT# all'istruzione 

Ok 


60 legge un'intera 

RUN 


linea alla volta nella 

PROGRAM 1DENT1F1ER? V1:P1 


variabile fittizia A$. 

VI :P1 1S 350 LINES LONG 


La variabile intera K% 

PROGRAM 1DENT1F1ER? V1:P2 


conta le linee del 

V1:P2 1S 1520 LINES LONG 

PROGRAM 1DENTIF1ER? A C 

8reak in 10 

Ok 


programma. 


EOF (PROGRAMMA) | 


Ritorna -1 (cioè vero) se è stata raggiunta la fine di un file sequen¬ 
ziale. 

E' opportuno usare EOF per verificare la fine del file mentre lo si 
legge, per evitare errori di "Input past end" 



Figura 12-9 Funzione EOF 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

file number 


è un'espressione numerica arrotondata all'intero 
più vicino. Si tratta del numero del buffer 
associato al file 
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Esempio 


10 DIM A (50) 

20 OPEN "DATAI" 

30 FOR K%=0 TO 50 
40 1F EOF(1) THEN 100 
50 INPUT# 1,A(K%) 

60 NEXT K% 


AGGIORNAMENTO DI UN FILE SEQUENZIALE 


Per aggiornare un file sequenziale, l'utente deve leggere l'intero file e 
quindi registrare i dati aggiornati su un nuovo file di output, come 
indicato nella tabella che segue: 


PASSO 

AZIONE 

1 

L'utente deve aprire il file sequenziale da aggiornare 

2 

L'utente deve aprire un nuovo file sequenziale 

3 

L'utente deve leggere una lista di dati e aggiornarli come 
richiesto 

4 

L'utente deve registrare i dati aggiornati sul nuovo file 

5 

L'utente deve ripetere i passi 3 e 4 fino a quando tutti i dati 
sono stati letti, aggiornati e registrati sul nuovo file; quindi 
andare al passo 6 

6 

L’utente deve chiudere entrambi i file (a meno che non debbano 
essere riutilizzati con lo stesso metodo d'accesso da un altro 
programma concatenato) 
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GESTIONE DI UN FILE SU DISCO 


DEFINIZIONE DEL FORMATO DI UN RECORD 


Dopo l'apertura di un file ad accesso diretto l'utente deve definire il 
formato del record tramite un'istruzione F1ELD. L'istruzione F1ELD 
organizza il buffer del file ad accesso diretto in modo che diventa 
possibile passare dati da programma a disco e viceversa. 

11 record può essere suddiviso in più campi tramite un'istruzione F1ELD, 
ma il numero totale di byte allocati in un’istruzione F1ELD non deve 
superare la lunghezza del record determinata al momento dell'apertura del 
file. Diversamente si verifica un errore pe 1- "Field overflow". (La 
lunghezza di default del record è 256 byte). 

L'istruzione FIELD stabilisce la dimensione di ciascuno di questi campi e 
consente ai nomi delle variabili stringa di puntare a ciascun campo. I 
nomi di questi campi, diversamente dalle stringhe ordinarie che puntano 
ad un'area in memoria chiamata "spazio stringa", puntano all'area del 
buffer associato al file. 

Tutti i dati, stringa e numeri, devono essere posti nel buffer in formato 
stringa. Esistono tre paia di funzioni (MKI$/CV1,MKS$/CVS,MKD$/CVD) per 
convertire i numeri in stringa e viceversa. 

Nota : Non è possibile utilizzare il nome di un campo in un'istruzione 
INPUT, o sul lato sinistro di un'istruzione LET. Quel nome non punterebbe 
più al campo nel buffer, ma allo spazio stringa; quindi non sarebbe pos¬ 
sibile per l'utente accedere a quel campo utilizzando il nome prece¬ 
dentemente assegnatogli. 


FIELD (PR0GRAMMA/1MMED1AT0) 


Definisce i campi nel buffer di un file ad accesso diretto 



Figura 12-10 Istruzione FIELD 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
file 

field width 

è il numero di byte da allocare nel campo. 

Un byte corrisponde ad un carattere 

field name 

è il nome stringa da assegnare al campo definito 
da "field width" 


Esempi 


VIDEO 


20 FIELD# 1,15 AS NAME$,20 AS C$, 
10 AS P$ 


80 NAME$=B$ (Errato) 


100 LSET NAME$=BS (Corretto) 


COMMENTI 


L'istruzione 20 alloca le prime 15 
posizioni (byte) del buffer# 1 al 
campo di nome NAMES, le successive 
20 al campo di nome C$ e le ultime 
10 al campo di nome P$ 

Dopo l'esecuzione dell'istruzione 
80, NAME$ diventa un nome ordinario 
di una variabile stringa. L'utente 
non ha più la possibilità di acce¬ 
dere al primo campo del buffer. 


L'utente deve invece usare l’istru¬ 
zione 100 ( si vedano di seguito le 
istruzioni LSET/RSET) 


► 
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GESTIONE DI UN FILE SU DISCO 


30 FIELD# 2,128 AS N1$,128 AS N2$ L'utente può usare FIELD tante 
. volte quante vuole per "riorganiz- 

. zare" il buffer di un file 


100 FIELD# 2,128 AS N3$,100 AS N4$, 
28 AS N5$ 


50 FIELD# 3,16 AS K$(1 ) ,112 AS L$(1) 


90 FIELD# 3,128 AS DUMMYS, 
16 AS K$(2),112 AS L$(2) 


La riorganizzazione di un buffer 
mediante l'istruzione FIELD non 
cancella i contenuti del buffer; 
viene cambiato soltanto il modo di 
accedere al buffer (tramite i nomi 
dei campi). Così due o più nomi di 
campi possono fare riferimento alla 
stessa area del buffer. 

In un'istruzione FIELD l'utente può 
utilizzare una variabile fittizia 
per "saltare" una parte del buffer 
e iniziare la strutturazione del 
buffer da quel punto 


Nella seconda istruzione FIELD, 
DUMMYS serve a spostare la posizio¬ 
ne d'inizio di K$(2) alla posizione 
129 del buffer 


Nota 


E' buona norma che la somma di tutte le dimensioni dei campi sia uguale 
alla lunghezza del record stabilita dall'istruzione OPEN. In ogni caso 
questa somma non deve superare la lunghezza del record, diversamente si 
verifica un errore per "Field overflow". 


REGISTRAZIONE 01 RECORD SU UN FILE AD ACCESSO DIRETTO 


Per registrare record su un file ad accesso diretto, l'utente deve aprire 
il file, specificando "R" come metodo d'accesso. 

L'istruzione PUT-File consente poi la registrazione dei record. 11 
contenuto del record deve essere stato preparato nell'ambito del buffer 
ad accesso diretto prima dell'esecuzione dell'istruzione PUT-File, 
tramite le istruzioni LSET o RSET. Le istruzioni LSET e RSET muovono i 
dati dalla memoria al buffer del file ad accesso diretto allocando le 
espressioni stringa nei campi predefiniti. 
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Se l'espressione stringa utilizza meno byte di quelli che l'utente ha al¬ 
locato nell’istruzione F1ELD, lo spazio allocato in più viene riempito 
con caratteri blank che possono essere posizionati a sinistra o a destra 
del valore dell'espressione stringa. L'allineamento a sinistra (v. istru¬ 
zione LSET) inizia nella prima posizione del campo. L'allineamento a 
destra (v. istruzione RSET) termina nell'ultima posizione del campo. 
Quando l'utente deve trasferire valori numerici nel buffer, deve conver¬ 
tirli in stringa tramite le funzioni MK1$, MKS$ e MKD$. 

Nota : La funzione LOC ritorna il numero del record appena scritto tramite 
una PUT-File o letto tramite una GET-File. 

Per registrare record su un file ad accesso diretto, sono richiesti i 
seguenti passi di programma: 


PASSO 

AZIONE 

ESEMPI 

1 

L'utente deve aprire 
il file, specificando 
"R" come metodo d'ac¬ 
cesso e (opzionalmen¬ 
te) la lunghezza del 
! record 

10 OPEN "R",# 1 ,"1 :DIR",22 

2 

L'utente deve strut¬ 
turare il buffer tra¬ 
mite una F1ELD # 

20 F1ELD# 1,15 AS A$,5 AS B$, 

2 AS C$ 

3 

L'utente può quindi 
inserire i dati nel 
buffer 

100 LSET A$="J0HN JONES" 

110 LSET B$="U.K." 

120 LSET C$=MK1$(I%) 

4 

L'utente può registrare un 
record (il quinto) sul file 

130 PUT# 1,5 

5 

L'utente può registrare 
un altro record ripar¬ 
tendo dal passo 3. Diver¬ 
samente deve andare al 
passo 6 
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GESTIONE DI UN FILE SU DISCO 


6 


Quando ha finito di re¬ 
gistrare i suoi dati l'u¬ 
tente chiuderà il file 
(a meno che voglia conca¬ 
tenare un altro program¬ 
ma che debba utilizzare 
lo stesso file con lo 
stesso metodo d'accesso) 


150 CLOSE# 1 


LSET/RSET (PROGRAMMA/IMMEDIATO) 


LSET memorizza un valore stringa allineato a sinistra in un campo del 
buffer ad accesso diretto, o allinea a sinistra un valore stringa in una 
variabile stringa. 

RSET memorizza un valore stringa allineato a destra in un campo del 
buffer ad accesso diretto o allinea a destra un valore stringa in una 
variabile stringa. 



Figura 12-11 Istruzioni LSET/RSET 






















Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

field name 

è una variabile stringa che specifica il nome di 
un campo di un buffer ad accesso diretto 

string variable 

è il nome di una variabile stringa ordinaria 

MKl$/MKS$/MKD$ 

sono le funzioni che convertono un intero 
(MK1$), o un valore in singola precisione 
(MKS$), o in doppia precisione (MKD$), in valore 
stringa 

string expression 

è la stringa da allineare a sinistra o a destra 
in un dato campo 

numeric expression 

è il valore numerico da convertire in stringa e 
allineare a sinistra o a destra in un dato campo 


Esempi 


VIDEO 


COMMENTI 

10 OPEN "R”, #1,"1 :MYF1LE/MYPASS",20 

20 FIELD #1,10 AS N1$,10 AS N2$ 

30 LSET NI$="CHARLES" 

40 LSET N2$="JAMES" 


Le istruzioni 30 e 40 assegnano i 
dati sul buffer #1 come segue: 

NI $ 

• 


CHARLES 


100 RSET NI$="CHARLES" 

110 RSET N2$="JAMES" 


N2$ 


• 


JAMES 


200 LSET NI$="CHARLES THOMSON" 


Le istruzioni 100 e 110 assegnano 
i dati nel buffer come segue: 
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GESTIONE DI UN FILE SU DISCO 


NI $ 


CHARLES 


N2$ 


JAMES 


L'istruzione 200 assegna i dati 
nel buffer come segue: 

NI $ 

CHARLES TH 

Nota : Se una stringa è troppo 
lunga e quindi non può essere 
contenuta nel campo del buffer 
specificato, viene troncata sulla 
destra, indipendentemente dal 
fatto che sia stata usata l'i¬ 
struzione LSET o RSET. 


110 A$=SPACE$(20) 
120 RSET A$=N$ 


Le istruzioni LSET e RSET possono 
anche essere utilizzate con una 
variabile non associata all'i¬ 
struzione F1ELD per l'allinea¬ 
mento a destra o a sinistra di 
una stringa in un dato campo. 
Questa può essere una utile tec¬ 
nica di formattazione per le 
operazioni di stampa. 


Nell'esempio a sinistra l'istru¬ 
zione RSET allinea a destra la 
stringa N$ in un campo di 20 
caratteri 
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| MK1$/MKS$/HKD$ (PR0GRAMMA/1MMEDIAT0) 


Queste funzioni cambiano un numero in una stringa. 

La funzione MKI$ converte un intero in una stringa di 2 caratteri 

La funzione MKS$ converte un valore in singola precisione in una 
di 4 caratteri 

La funzione MKD$ converte un valore in doppia precisione in una 
di 8 caratteri 



Figura 12-12 Funzione MK1$ 



Figura 12-13 Funzione MKS$ 



Figura 12-14 Funzione MKD$ 


stringa 


stringa 
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GESTIONE DI UN FILE SU DISCO 


Esempi 


VIDEO 

COMMENTI 

30 LSET D$=MK1$(I%) 

11 campo D$ deve ora contenere una 
rappresentazione di due byte del¬ 
l'intero 1% 

100 STR4C$=MKS$(SPV) 

Una funzione "make" <MK1$, MKS$, 
MKD$) viene utilizzata con le 
istruzioni LSET e RSET dato che 
queste funzioni utilizzano come 
argomenti delle stringhe. In questo 
caso SPV è il nome di una variabile 
in singola precisione che viene 
convertita in una stringa di 4 
caratteri e assegnata alla varia¬ 
bile stringa STR4C$. 


PUT-File (PROGRAMMA/IMMEDIATO) 


Registra su un file ad accesso diretto i dati prelevati dal buffer e 
associato al file. 



file 

number 


iXr 


O- 


record 

number 


lL 


Figura 12-15 Istruzione PUT-File 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica che specifica il 
numero del buffer associato al file 
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record number 

è un'espressione numerica che specifica il 
numero del record nel file. 11 numero minimo di 
record è 1, il numero massimo è 32767. In caso 
di omissione di questo parametro viene registra¬ 
to il record corrente. 


Nota: Il record corrente è il record il cui 
numero è più alto di uno rispetto a quello 
dell'ultimo record selezionato. La prima volta 
che l’utente accede a un file ad accesso di¬ 
retto, il numero del record corrente è definito 
uguale a 1■ 




Esempi 


VIDEO 

COMMENTI 

LIST 

L'istruzione 10 apre il 

10 OPEN "r",1,"1:RAND",48 

file ad accesso diretto 

20 F1ELD 1,20 AS RI $,20 AS R2$,8 AS R3$ 

RAND, con una lunghezza 

30 FOR L=1 TO 4 

di record di 48 byte, 

40 INPUT "name";N$ 

sul disco inserito nel- 

50 INPUT "address";M$ 

l'unità 1. Il numero 

60 INPUT "phone";P# 

del file è 1. L'istru- 

70 LSET RI$=N$ 

zione 20 divide il 

80 LSET R2$=M$ 

buffer in campi. 

90 LSET R3$=MKS$(P#) 


100 PUT 1.L 

L'istruzione 100 regi- 

110 NEXT L 

stra un record nel file 

120 CLOSE 1 

RAND, con il numero di 

130 END 

record definibile tra- 

Ok 

mite la variabile di 

RUN 

controllo del ciclo 

name? super man 

iterativo FOR/NEXT 

address? USA 


phone? 11234621 


name? robin hood 


address? England 


phone? 23462101 


Ok 
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GESTIONE DI UN FILE SU DISCO 


LOC (PROGRAMMA/1KMED1ATO) I 


Nel caso di file ad accesso diretto, la funzione LOC fornisce il numero 
del record appena letto tramite un'istruzione GET# , o ritorna il numero 
del record appena registrato tramite un'istruzione PUT # . 



Figura 12-16 Funzione LOC 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica arrotondata all'intero 
più vicino. E’ il numero del buffer associato al 
file 


Esempi 


VIDEO 


10 OPEN "R",2, 
20 F1ELD 2,20 
20 AS F3$, 


COMMENTI 


"TOWNS",80 

AS FI$,20 AS F2$, 

20 AS F4$ 


In questo caso FIS è il nome di un 
campo. Se il valore di FI $ è lo stesso 
di A$, viene visualizzato il numero 


30 Y=1 


del record nel quale è stato trovato. 


100 A$="M1LAN 
110 GET 2,Y 
120 Y=Y+1 

130 1F FI$=A$ THEN PR1NT 

"FOUND IN RECORD";L0C(2): 
CLOSE:END 
140 GOTO 110 
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Nota 


Se il file è stato aperto, ma non è stata ancora eseguita alcuna 
operazione di 1/0, LOC ritorna il valore 0. 


LETTURA DI RECORD DA UN FILE AD ACCESSO DIRETTO 


Per leggere record da un file ad accesso diretto, l'utente deve aprire il 
file, specificando "R" come metodo d’accesso. L'istruzione GET-File 
consente la lettura dei record. 

GET-File specifica sia il numero del file sia il numero del record da 
leggere. Con l'esecuzione di una GET-File, i contenuti del record 
specificato vengono trasferiti nel buffer del file. 

Per accedere ad un singolo dato memorizzato nel buffer (tramite il nome 
del campo) l'utente può usare: 

- un’istruzione LET (se vuole assegnarlo a una variabile programma), o 

- un'istruzione PR1NT, PR1NT US1NG, LPR1NT, o LPR1NT US1NG (se vuole 
visualizzarlo o stamparlo). 

Nota : Se l'utente vuole assegnare, visualizzare o stampare il nome di un 
campo da convertire in un numero deve effettuare la conversione usando la 
funzione CV1, o CVS o CVD. 

Nota : La funzione LOC ritorna il numero del record appena letto tramite 
una GET-File o scritto tramite una PUT-File. 

Per leggere i dati da un file ad accesso diretto, sono richiesti i 
seguenti passi di programma: 


PASSO 


AZIONE 

ESEMPI 

1 


L'utente deve aprire il file 
specificando "R" come metodo 
d'accesso e (opzionalmente) 
la lunghezza del record 

10 OPEN "R”,#2,"1:D1R",22 

2 


L’utente deve strutturare 

20 F1ELD#2,15 AS A$,5 AS B$,2 



il buffer tramite la F1ELD 

AS C$ 
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GESTIONE DI UN FILE SU DISCO 


3 

L'utente può quindi leggere 
un record dal file (A in¬ 
dica il numero del record) 

100 GET#2,A 

4 

L'utente può estrarre i 
dati dal buffer o con l'i¬ 
struzione LET o con l'istru¬ 
zione PR1NT (PR1NT USINO. 

1 valori numerici (memo¬ 
rizzati in formato stringa 
all'interno del buffer) 
devono essere convertiti 
in numeri usando le fun¬ 
zioni di "conversione": 

CV1, CVS e CVO 

100 Al $=A$ 

120 PR1NT B$ 

130 1%=CV1(C$) 

5 

L'utente può continuare 
a leggere un altro re¬ 
cord ripartendo dal passo 

3. Diversamente, deve 
andare al passo 6 


6 

Quando ha finito di 
leggere i suoi dati l'u¬ 
tente chiuderà il file 
(a meno che voglia con¬ 
catenare un altro pro¬ 
gramma che debba leggere 
dati dallo stesso file 
con lo stesso metodo 
d'accesso) 

500 CL0SE#2 


Nota : In un programma che esegue sia operazioni di input che di output 
sullo stesso file ad accesso diretto, l’utente spesso può utilizzare una 
sola istruzione OPEN e una sola istruzione FIELO. 
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I GET-File (PROGRAMMA/IMMEDIATO) 


Legge un record da un file ad accesso diretto. 


GET , 


f iT\ ■ 





file 

J ,r\ , 

record 

1 


number 

vjy 

number 



Figura 12-17 Istruzione GET-File 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

file number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del buffer associato al 
fi le 

record number 

è un'espressione numerica il cui valore arroton¬ 
dato specifica il numero del record da leggere 
(cioè da trasferire nel buffer). Se omesso, vie¬ 
ne letto il record corrente. 

11 numero minimo di re'cord è 1, il numero mas¬ 
simo è 32767. 

Nota: li record corrente è il record il cui 
numero supera di uno quello dell'iltimo record 
selezionato. 

La prima volta che l'utente accede ad un file ad 
accesso diretto (senza specificarne il numero 
nel record) il numero del record corrente è 
definito uguale a 1. 
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GESTIONE DI UN FILE SU DISCO 


Esempi 


VIDEO 


COMMENTI 


LIST 

10 OPEN "r",1,"1:RAND",48 
20 F1ELD 1,20 AS R1$,20 AS R2,8 AS R3$ 
30 FOR L=1 TO 4 
40 6ET 1,L 

50 PRINT R1$,R2$,CVD(R3$) 

60 NEXT 
70 CLOSE 
80 END 
Ok 
RUN 


Questo programma ricer¬ 
ca le informazioni me¬ 
morizzate nel file spe¬ 
cificato. 1 dati letti 
nel buffer sono acces¬ 
sibili da programma. 
Ciò avviene in questo 
caso tramite l'istru¬ 
zione PRINT (si veda 
l'istruzione 50. 


Super man USA 11234621 

robin hood England 23462101 


Si suppone che i dati 
siano stati registrati 
in precedenza sul file 
tramite l’istruzione 


Ok 


PUT-Fil 


e. 


CVI/CVS/CVD (PROGRAMMA/1MMED1ATO) | 


Convertono valori stringa in'valori numerici 

CV1 converte una stringa di 2 caratteri in un intero. 

CVS converte una stringa di 4 caratteri in un numero in singola precisio¬ 
ne. 


CVD converte una stringa di 8 caratteri in un numero in doppia 
precisione. 



Figura 12-18 Funzione CV1 
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Figura 12-19 Funzione CVS 


—*(EE)—<Ch 


\_. 

8 byte 




string 



- 


8 byte 
field name 


•©- 


Figura 12-20 Funzione CVD 


Esempi 

10 X#=CVD(N$) 
20 Y!=CVS(RI $) 


AGGIORNAMEN TO DI RECORD DI UN FILE AD ACCESS O DIRE TTO 

Per aggiornare un file ad accesso diretto, l'utente deve leggere ogni 
record da aggiornare e quindi registrarlo, come indicato nella tabella 
che segue. 


PASSO 


AZIONE 


1 L'utente deve aprire il file ad accesso diretto 


2 L'utente deve strutturare il buffer in campi 


► 
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GESTIONE DI UN FILE SU DISCO 


3 

L'utente deve leggere il record da aggiornare 

4 

L'utente deve estrarre i dati dal buffer per visualizzarli o 
assegnarli a variabili di programma 

5 

L'utente deve inserire i nuovi valori nei campi del buffer 

6 

L'utente deve registrare il record aggiornato 

7 

L'utente può aggiornare un altro record, ripartendo dal passo 3. 
Diversamente, deve andare al passo 8 

8 

L'utente deve chiudere il file (a meno che non lebba essere 
riutilizzato con lo stesso metodo d'accesso da un altro 
programma concatenato) 


Esempio 


VIDEO 

COMMENTI 

LIST 

L'istruzione 10 apre un file ad 

10 OPEN "r",1,"1:filetext",128 

accesso diretto, chiamato filetext 

20 FIELD 1,128 AS A$ 

e residente sul dischetto inserito 

30 INPUT "record number ";RNUM 

nell’unità 1 

40 GET 1.RNUM 


50 PRINT A$ 

L'istruzione 20, in questo caso, 

60 INPUT "give me data ";PP$ 

specifica soltanto un nome di campo 

70 LSET A$="new data —"+PP$ 


80 PUT 1,RNUM 

L'istruzione 40 legge il record da 

90 INPUT "CONTINUE (y/n) ";R$ 

aggiornare, il cui numero è intro- 

100 IF R$="y" THEN 30 

dotto da tastiera tramite l'istru- 

110 CLOSE 

zione 30 

Ok 


RUN 

L'istruzione 50 visualizza i dati 

record number ? 1 

provenienti dal buffer 

new datapoloo 


give me data ? gio 

L'istruzione 70 inserisce i nuovi 

CONTINUE (y/n) ? y 

valori nel campo del buffer, con- 

record number ? 1 

catenando (+) la variabile stringa 

new data —gio 

PP$ alla costante stringa "new data 

give me data ? poi 

__ 11 

CONTINUE (y/n) ? n 


Ok 
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L'istruzione 80 registra il record 
aggiornato 


Le istruzioni 90 e 100 consentono 
all'utente di continuare o di 
fermarsi 

L'istruzione 110 chiude il file. 


I 
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13. DEBUGGING E RECUPERO DEGLI ERRORI 
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DEBUGGING E RECUPERO DEGLI ERRORI 


TIPI 01 ERRORE 


Succede raramente che un programmatore, per quanto esperto sia, scriva 
al primo tentativo un programma privo di errori. Se si escludono gli 
errori relativi all’impostazione di una linea (già descritti nel 
capitolo 1), gli errori che, in genere, possono essere fatti vengono 
classificati in due categorie: 

- errori che si manifestano durante l'esecuzione di un programma, 
(run-time errors). Essi interrompono l'esecuzione e determinano la 
visualizzazione di un messaggio di errore. 

- errori logici, che consentono l’esecuzione completa del programma, ma 
portano a risultati sbagliati o inattesi. 

11 processo di individuazione della causa dell'errore (spesso denominato 
"bug") viene conosciuto con il termine di "debugging". L'M20 fornisce 
una serie di prestazioni che riducono i costi e le difficoltà di questo 
processo. 


TIPI DI ERRORE 


COMMENTI 

Run-time errors 
(errori individuati 
dall'M20 durante 

l'esecuzione di un 
programma o di una 
linea immediata) 


possono essere errori di sintassi (quando una 
linea contiene una sequenza di caratteri non 
corretta) o altri tipi di errori di esecuzione 
(NEXT privo di FOR, RETURN privo di GOSUB, 
ecc... ) 

E' anche possibile simulare un errore BASIC, o 
generare un errore definito dall'utente (da 
gestirsi mediante una routine di error trap). 
Vedere le istruzioni ERROR e ON ERROR GOTO 
illustrate di seguito. 

Errori di logica 
(errori che consen¬ 
tono il completamento 
dell'esecuzione del 
programma, ma pro¬ 
ducono risultati 
errati o inattesi) 


sono gli errori più difficili da individuare, e 
sono denominati errori "logici". Per fornire un 
semplice esempio, si assuma di aver scritto un 
programma che deve stampare i risultati di 15 
calcoli. Se, a seguito dell'esecuzione del 
programma, vengono stampati solo 11 risultati, 
deve essersi verificata una qualche forma di 
errore. L'individuazione dell'errore, se il 
programma è lungo e complesso e contiene molti 
salti, cicli e sottoprogrammi, può risultare un 
compito non agevole. E' possibile che il 
controllo non sia stato trasferito all'istruzio- 
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ne prevista o che qualche calcolo non sia stato 
effettuato. Le possibilità di errore sono 
molteplici. 

In questi casi, può risultare molto utile poter 
sapere esattamente quali istruzioni vengono 
eseguite ed il flusso della loro esecuzione 


VISUALlZZAZIOUg DEI NUMERI DI LINEA ESEGUITI (TRAC1N6) 

Un metodo utile di debugging di errori logici consiste nel tracciare il 
flusso di esecuzione delle istruzioni per una parte o per l'intero 
programma. L'M20 fornisce, a questo proposito, due comandi che possono 
anche essere utilizzati come istruzioni nell'ambito di un programma. 


TRON/TROFF (PR0GRAMMA/IMMED1AT0) 


TRON (TRACE ON) produce una lista dei numeri di linea di tutte le 
istruzioni eseguite. 

TROFF (TRACE OFF) arresta la lista iniziata con l'impostazione del 
comando TRON. 



Figura 13-1 Comando TRON 



Figura 13-2 Comandò TROFF. 
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DEBUGGING E RECUPERO DEGLI ERRORI 


Esempio 


TRON 

Ok 

LIST 
10 K=10 

20 POR J=1 TO 2 
30 L=K+10 
40 PR1NT J;K;L 
50 K=K+10 
60 NEXT 
70 END 
Ok 
RUN 


VIDEO 


COMMENTI 


TRON setta l'indicatore di traccia 
che visualizza il numero di linea 
di ogni istruzione di programma 
eseguita. 1 numeri sono racchiusi 
tra parentesi quadre. 1 numeri, 
che non sono racchiusi tra paren¬ 
tesi quadre (nell'esempio) sono il 
risultato dell'esecuzione dell'i¬ 
struzione 

40 PR1NT J;K;L 


[10] [20] [30] [40] 1 10 20 
[50] [60] [30] [40] 2 20 30 
[50] [60] [70] 


L'indicatore di traccia viene 
resettato con il comando TROPF 
oppure all'esecuzione di un coman- 


Ok 

TROFF 

Ok 


do NEW. 


IN TERRUZIONE DELL'ESECUZIONE DI UN PROGRAMMA 

L'esecuzione di un programma viene interrotta quando: 

- si imposta Bf:W U oppure 

- viene eseguita un'istruzione STOP, oppure un’istruzione END, oppure 

- viene emesso un messaggio d'errore 

Nei casi sopra ricordati, l'M20 entra in Stato Comandi (escluso nel caso 
di un errore di sintassi quando l'M20 entra in Stato Editor). 


In Stato Comandi è consentita la visualizzazione delle variabili di 
programma (con l'uso delle istruzioni immediate PRINT e PR1NT US1NG) o 
la modifica del loro valore (con l'uso delle istruzioni immediate LET 
oppure SWAP). E' possibile riprendere l'esecuzione del programma 
impostando il comando CONT (ad esclusione del caso in cui si è 
riscontrato un errore o quando l'utente ha modificato il programma). 
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END (PROGRAMMA) 

Fa terminare l'esecuzione del programma, chiude tutti i file dati e 
riporta l'M20 in Stato Comandi. 



Figura 13-3 Istruzione END 

Note 

Sebbene non sia necessario finire un programma con una istruzione END, 
questa istruzione è molto utile poiché chiude tutti i file dati aperti; 
inoltre aumenta la leggibilità del programma. L'istruzione END è anche 
usata per porre fine al programma al termine di una diramazione 
(branch). Ad esempio: 

250 IF Z > 1000 THEN END 

L'istruzione END può essere inserita in qualsiasi parte di un programma 
per terminarne l'esecuzione. A differenza dell'istruzione STOP, l'istru¬ 
zione END non produce la visualizzazione del messaggio BREAK. 

L'esecuzione di un'istruzione END provoca sempre un ritor-o in Stato 
Comandi. L'utente può visualizzare i valori delle variabili di programma 
con l'uso dell'istruzione immediata PR1NT (o PR1NT US1NG). L'utente può 
anche riprendere l'esecuzione del programma con il comando CONT però 
deve tener presente che la END ha chiuso tutti i file dati. 

STOP (PROGRAMMA) 

Interrompe l'esecuzione del programma e riporta l'M20 in Stato Comandi. 



Figura 13-4 Istruzione STOP 
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DEBUGGING E RECUPERO DEGLI ERRORI 


Note 

L'istruzione STOP, come l'istruzione END, può essere inserita in ogni 
parte del programma. Quando il controllo dell'esecuzione passa a questa 
istruzione, il messaggio seguente viene visualizzato: 

Break in line nnnnn 

A differenza dell'istruzione END, l'istruzione STOP non chiude i file. 

11 BASIC ritorna sempre in Stato Comandi dopo l'esecuzione dell'istru¬ 
zione STOP. L'utente può riprendere l'esecuzione del programma con il 
comando CONT (vedere in seguito). 


Esempio 


VIDEO 


COMMENTI 

LIST 


l'istruzione 30 permette di controllare ed 

10 INPUT A,B,C 


osservare il primo valore di X prima che il 

20 X=A*B 


secondo venga calcolato e visualizzato. In 

30 STOP 


questo semplice caso, l'istruzione STOP non 

40 X=X/C 


sembra molto utile, ma lo è, invece, nel caso di 

50 PRINT X 


programma di grosse dimensioni. Impostando 

60 END 


un'istruzione STOP alla fine di un trasferimento 

Ok 


di controllo, il programma si arresterà solo se 

RUN 


il trasferimento viene effettuato. Permette 

? 4,3,6 


anche di assegnare nuovi valori alle variabili 

Break in 30 


prima che l'esecuzione continui con l'uso del 

Ok 


comando CONT. 

PRINT X 



12 


Quando il programma sarà sufficientemente veri- 

Ok 


ficato, l'utente potrà cancellare tutte le 

CONT 


istruzioni STOP, inserite per il debugging e 

2 


potrà rinumerare il programma. 

Ok 




CONT (IMMEDIATO) 


Permette di riprendere l'esecuzione di un programma interrotto da un 
U o da una istruzione STOP o da una istruzione END. 
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L'esecuzione riprende dal punto in cui si é verificata l'interruzione. 


Figura 13-5 Comando 

Caratteristiche 


SE... 

U è stato 
impostato dopo un 
prompt di una i- 
struzione INPUT 

si incontra una 
istruzione STOP 
o una istruzio¬ 
ne END 



CONT 


ALLORA... 

l'esecuzione continua ristampando il prompt (? 
seguito da uno spazio, o la stringa prompt) 


i valori intermedi possono essere esaminati e 
modificati con l'uso delle istruzioni immediate 
(PR1NT, PR1NT USING, LET, SWAP). 

L'esecuzione può essere ripresa impostando il 
comando CONT o l'istruzione immediata GOTO, che 
rimanda il controllo dell'esecuzione ad un 
numero di linea specificato (l'impostazione di 
RUN numero di linea invece di GOTO numero di 
linea consente di ripartire dallo stesso punto, 
ma provoca l'azzeramento di tutte le variabili 
del programma). 

Ad esempio: 

10 INPUT A,B,C 

20 K=A A 2*5.3:L=B A 3/.26 

30 STOP 

40 M=C*K+100:PR1NT M 
RUN 

? 1,2,3 
Break in 30 
Ok 

PR1NT L 
30.7692 
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DEBUGGING E RECUPERO DEGLI ERRORI 


Ok 

CONT 

115.9 

Ok 


il programma è 
stato modificato 
durante l'interru¬ 
zione 


CONT non è valido 


OPPURE 

si è verificato 
un errore 


CONTROLLO E RECUPERO DEGLI ERRORI 


Di solito quando si incontra un errore il BASIC arresta l'esecuzione e 
visualizza un appropriato messaggio di errore. Se questo é un errore di 
sintassi l'M20 passa in Stato Edit, in tutti gli altri casi l'M20 passa 
in Stato Comandi. 

Spesso l'utente vuole trattare l'errore in modo diverso dallo standard. 

Questo può essere fatto scrivendo una routine di trattamento dell'er¬ 
rore. 

Usando istruzioni ON ERROR GOTO, é possibile introdurre una o più 
routine di gestione degli errori. 11 controllo viene trasferito alla 
linea specificata dopo GOTO, quando si é verificato un errore. Una sola 
routine di trattamento degli errori può essere attiva in un certo 
istante.L'esecuzione di una istruzione "ON ERROR GOTO 0"al di fuori di 
una routine di trattamento dell'errore disattiva il trattamento non 
standard degli errori. 

L'esecuzione di una istruzione "ON ERROR GOTO 0" all'interno di una 
routine di gestione degli errori indica che un errore non trattato dalla 
routine deve essere gestito in modo standard. 

Nel caso si verifichi un errore run-time e il trattamento non standard 
degli errori sia abilitato, il controllo dell'esecuzione viene tra¬ 
sferito alla linea specificata. E' possibile allora fare uso delle 
funzioni ERR e ERL ed eseguire la routine di recupero dell'errore. La 
funzione ERR contiene il codice dell'errore, mentre la funzione ERL il 
numero della linea in cui è stato individuato l'errore. 
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La routine di gestione degli errori controlla tutti gli errori che 
l'utente desidera recuperare ed indica il modo di gestirli. Ciò, di 
solito, porta come conseguenza la correzione dell'errore e la ripresa 
dell'esecuzione nel punto in cui si era verificato l'errore senza 
passare in Stato Comandi. 


ERROR (PR0GRAMT1A/IMMEDIAT0) 


Simula il verificarsi di un errore del linguaggio BASIC, oppure genera 
un errore definito dall'utente. 



numeric 



expression 



Figura 13-6 Istruzione ERROR 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

numeric expression 


il valore dell'espressione numerica rappresenta 
un codice di errore. 

Deve essere maggiore di 0 e minore o uguale a 
255. Se non è un intero, viene arrotondato 
all'intero più vicino. 

Nota: il BASIC non usa tutti i codici d'errore 
disponibili. 1 codici non utilizzati visualiz¬ 
zano il messaggio "Unprintable error". 


13-8 


LINGUAGGIO BASIC - MANUALE GENERALE 















DEBUGGING E RECUPERO DEGLI ERRORI 


Caratteristiche 




SE... 

ALLORA... 

il valore dell'e- 

l'istruzione ERROR simulerà il verificarsi di 

spressione numerica 
corrisponde ad un 
codice di errore 
del BASIC (vedere 

1'Appendice F) 

tale errore, ed il messaggio di errore corri¬ 
spondente verrà visualizzato. 

Ad esempio: 

LIST 

10 S=10 

20 T=5 

30 ERROR S+T 

40 END 

Ok 

RUN 

String too long in line 30 

Ok 

Oppure, in stato immediato 

ERROR 15 

String too long 

Ok 

il valore dell'e- 

l'istruzione ERROR genera un errore definito 

spressione numerica 
è maggiore di tutti 
i codici di errore 
del BASIC 

dall'utente. Questo codice di errore può allora 
essere convenientemente usato in una routine di 
gestione degli errori (vedere ON ERROR GOTO qui 
di seguito). 

Nota: Per definire i propri codici di errore si 
usi un valore che è maggiore di tutti i codici 
di errore BASIC (E' preferibile usare codici 
prossimi a 255 -valore massimo-, così da 
mantenere la compatibilità nell'eventualità in 
cui più codici di errore siano aggiunti al 
linguaggio BASIC) 

un'istruzione ERROR 
specifica un codice 
per il quale non è 
stato definito un 
messaggio di errore 

il BASIC risponde con il messaggio: Unprintable 
error 










ON ERROR GOTO (PROGRAMMA) 


Permette la gestione degli errori e specifica la prima linea della 
routine di gestione degli errori (ogni programma BASIC può avere solo 
una routine di gestione degli errori attiva in un dato istante). 



Figura 13-7 Istruzione ON ERROR GOTO 


Dove 


ELEMENTO 01 SINTASSI 


SIGNIFICATO 

line number 


è la prima linea di una routine di gestione 
degli errori. Deve essere maggiore di 0 e minore 
o uguale a 65529. 

Nota: L'istruzione ON ERROR GOTO 0 non trasferi¬ 
sce il controllo alla linea di numero 0, in caso 
di errore, ma disabilita la gestione non 
standard degli errori. 

Così se l'istruzione ON ERROR GOTO 0 è in una 
routine di gestione degli errori e questa 
istruzione viene eseguita quando un errore è 
ancora pendente allora viene visualizzato il 
messaggio standard di errore ed il sistema entra 
in Stato Comandi. 
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DEBUGGING E RECUPERO DEGLI ERRORI 


Esempio 


VIDEO 


COMMENTI 

110 ON ERROR GOTO 400 


Se si introduce un 
valore di B maggiore 
di 5000, viene visua¬ 
lizzato il messaggio: 

120 INPUT "UHAT 1S YOUR BET";B 

130 IF B > 5000 THEN ERROR 210 


HOUSE L1M1T IS $5000 

400 1F ERR=210 THEN PR1NT "HOUSE L1M1T 1S $5000' 


e l'esecuzione ripren¬ 
de alla linea 120. Se 
si incontrano altri 

410 1F ERL=130 THEN RÉSUMÉ 120 


errori, l'istruzione 

420 ON ERROR GOTO 0 


420 fa si che sia 
visualizzato il mes¬ 
saggio standard di 
errore. 


Caratteristiche 


SE... 


ALLORA... 

E' stata abilitata 
la gestione non 
standard degli erro¬ 
ri (tramite una 
istruzione 

ON ERROR GOTO) 


tutti gli errori individuati (inclusi gli errori 
verificatisi nelle linee ad esecuzione immedia¬ 
ta) determineranno un trasferimento alla routine 
di gestione dell'errore specificata 

il numero di linea 
dopo ON ERROR GOTO 
non esiste 


viene visualizzato il messaggio: 

Undefined line 

viene eseguita l'i¬ 
struzione ON ERROR 
GOTO 0 


la gestione non standard degli errori viene 
disabilitata. Errori successivi visualizzeranno 
un messaggio standard di errore ed interrom¬ 
peranno l'esecuzione. 

l'istruzione ON ERROf 
GOTO 0 é inserita in 
una routine di ge¬ 
stione degli errori 


il programma BASIC si arresta e viene visualiz¬ 
zato il messaggio standard di errore per 
l'errore che ha causato l’attivazione della 
routine. 



















Nota : Si raccomanda che tutte le routine di 
gestione degli errori eseguano una istruzione ON 
ERROR GOTO 0 nel caso in cui si verifichi un 
errore di cui non è previsto il recupero. 


si verifica un errore 
durante l'esecuzione 
di una routine di 
gestione non standard 
degli errori 


il programma BASIC evidenzia un messaggio di 
errore e l'esecuzione termina. Non è possibile 
trasferire il controllo alla routine di gestione 
degli errori quando un errore si verifica 
nell'ambito della stessa routine. 


Nota 

Non è consentito gestire in modo non standard gli errori di "overflow" e 
"division by zero". 


I ERL/ERR (PROGRAMMA/IMMEDIATO) 


Quando si verifica un errore, la funzione ERL fa ritornare il numero di 
linea nella quale l'errore è stato individuato, mentre la funzione ERR 
fa ritornare il codice di errore. 



Figura 13-8 Funzione ERL 



Figura 13-9 Funzione ERR 
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DEBUGGING E RECUPERO DEGLI ERRORI 


Caratteristiche 

Le funzioni ERL e ERR vengono generalmente, utilizzate nelle istruzioni 
1F...THEN...ELSE oppure 1F...GOTO...ELSE per trasferire il controllo 
d'esecuzione alla routiie di gestione degli errori. 


SE. 


ALLORA... 

1'istruzione che 
ha causato l'er- 


ERL conterrà il valore 65535. 

rore è stata una 
istruzione immediata 


Per verificare se si è verificato un errore in 
una istruzione immediata si usi: 

1F 65535=ERL THEN... 

Altrimenti, si usi: 

IF ERR = error code THEN... 

1F ERL = line number THEN_ 

line number non è 
sul lato destro del¬ 
l'operatore di con¬ 
fronto 


non può essere attribuito un nuovo numero di 
linea mediante la funzione RENUM 


Esempio 


VIDEO 


COMMENTI 

LIST 


Se si imposta un vaio- 

10 REM RETTANG0L02 


re negativo per B 

20 ON ERROR GOTO 70 


oppure per H, la rou- 

30 INPUT "Base e Altezza";B,H 


tine di gestione del- 

40 1F (B< 0) OR (H< 0) THEN ERROR 200 


l'errore viene attiva- 

50 PR1NT "Area="; B*H;" B=";B;" H=";H 


ta ed il sistema vi- 

60 GOTO 30 


sualizza: 

70 1F (ERR=200) AND (ERL =40) 



THEN PR1NT "B o H<0": RÉSUMÉ 30 


B o H < 0 

80 ON ERROR GOTO 0 



90 END 


L'esecuzione viene ri- 

Ok 


presa all'istruzione 

RUN 


30 (vedere l'istruzio- 

Base e Altezza? -2,5 
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Base e Altezza? 2,5 
Area= 10 B= 2 H= 5 
Base e Altezza? A C 
Break in 30 


B o H < 0 


ne RÉSUMÉ qui di se¬ 
guito). 


Ok 


Si noti l'uso di ERR e 
di ERL nella routine 
di gestione degli er¬ 
rori 


Note 


Queste funzioni possono essere usate anche come normali funzioni BASIC. 
Per esempio: 

PR1NT ERR 

PR1NT "Troppo grande", ERL 
1% = ERR 


RÉSUMÉ (PROGRAMMA) 

Riprende l'esecuzione del programma principale dopo aver eseguito una 
routine di gestione degli errori. 




V* 



Figura 13-10 Istruzione RÉSUMÉ 
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DEBUGGING E RECUPERO DEGLI ERRORI 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

0 


l'esecuzione riprende all'istruzione che ha 
causato l'errore. 

Nota: RÉSUMÉ 0 e RÉSUMÉ sono equivalenti 

NEXT 


l'esecuzione riprende alla prima istruzione 
successiva a quella che ha causato l'errore 

line number 


l'esecuzione riprende al numero di linea speci¬ 
ficato 


Note 

Un'istruzione RÉSUMÉ che non è inclusa nella routine di gestione degli 
errori fa visualizzare il messaggio "RÉSUMÉ without error". 


Esempi 


VIDEO 


COMMENTI 


LIST 

10 REM RETTANG0L03 

20 ON ERROR GOTO 70 

30 INPUT "Base e Altezza";B,H 

40 1F (B<0) OR (H<0) THEN ERROR 200 

50 PR1NT "Area=";B*H;"B=";B;" H=";H 

60 GOTO 30 

70 1F (ERR=200) AND (ERL=40) THEN RÉSUMÉ 

80 ON ERROR GOTO 0 

90 END 

Ok 

RUN 

Base e Altezza? -2,5 

AC 

Ok 


se si introduce un 
valore negativo per B 
oppure H, la routine 
di gestione degli er¬ 
rori viene attivata. 

In questo caso la 
routine determina la 
ripresa dell'esecu¬ 
zione all'istruzione 
che ha causato l'er¬ 
rore, causando in 
questo modo un ciclo 
senza fine. 


Per fermare l’esecu¬ 
zione agire su 

u 


► 
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70 IF (ERR= 200) AND (ERL=40) THEN RÉSUMÉ NEXT 

RUN 

Base e Altezza? -2,5 

Area=-10 B=-2 H= 5 

Base e Altezza? AC 

Break in 30 

Ok 


correggendo così la 
linea 70, l'errore 
viene ignorato 

70 IF (ERR=200) AND (ERL=40) THEN RÉSUMÉ 30 


correggendo così la 

RUN 


linea 70 la routine di 

Base e Altezza? -2,5 


gestione degli errori 

Base e Altezza? 2,5 


fa sì che l'esecuzione 

Area= 10 B= 2 H= 5 


sia ripresa alla linea 

Base e Altezza? AC 


30 

Break in 30 



Ok 
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SOMMARIO 


Questo capitolo intende far conoscere all'utente le prestazioni grafiche 
disponibili sull'M20 e le loro modalità d'uso. 

In un "computer" la grafica è il mezzo con il quale l'informazione viene 
rappresentata sotto forma di figura; una qualunque combinazione di testi 
e di figure è "grafica”. 


INDICE 

INTRODUZIONE 14-1 

FINESTRE 14-2 

W1ND0W - Per aprire una 14-4 

finestra (PROGRAMMA/IMMEDIATO) 

IJ1ND0W - Per variare lo 14-9 


spazio tra linee e caratteri 
(PR0GRAMMA/1MMED1AT0) 

W1ND0W - Per selezionare una 14-11 
finestra (PROGRAMMA/1 WED1ATO) 


CLOSE W1ND0U 14-13 

(PROGRAMMA/IMMEDIATO 

USO DEL COLORE 14-14 

COLOR - Per selezionare i 14-17 

colori contemporanei 
(PROGRAMMA/IMMEDIATO) 

COLOR - Per selezionare i 14-18 

colori di foreground e di 
background (PROGRAMMA/IMMEDIATO) 

CLS (PROGRAMMA/IMMEDIATO) 14-20 

SISTEMI DI COORDINATE 14-20 


SCALE (PROGRAMMA/IMMEDIATO) 14-22 
SCALEX (PROGRAMMA/IMMEDIATO) 14-25 


SCALEY (PROGRAMMA/IMMEDIATO) 14-26 

VISUALIZZAZIONE DI PUNTI 14-27 

PSET (PROGRAMMA/IMMEDIATO) 14-27 

PRESET (PROGRAMMA/IMMEDIATO) 14-28 

P01NT (PROGRAMMA/IMMEDIATO) 14-29 

VISUALIZZAZIONE DEI CURSORI 14-30 

CURSOR (PROGRAMMA/IMMEDIATO) 14-31 

POS (PROGRAMMA/IMMEDIATO) 14-34 

COME TRACCIARE FIGURE 14-35 

LINE (PROGRAMMA/IMMEDIATO) 14-36 

C1RCLE (PROGRAMMA/1MMEDIATO) 14-39 

DRAW (PROGRAMMA/IMMEDIATO) 14-42 

PAINT (PROGRAMMA/IMMEDIATO) 14-48 

COME MEMORIZZARE E VI5UAL1Z- 14-52 
ZARE F INESTRE E RETTANGOL I 

GET - Grafica 14-52 

(PR0GRAMMA/1MMEDIAT0) 

PUT - Grafica 14-54 

(PR0GRAMMA/1MMEDIAT0) 

PR ESTAZ IONI GRA FICHE 14-58 

FORNITE DAL PC0S""~ 


\ 


X"'\ 


14-ii 














GRAFICA 


INTRODUZIONE 

L'M20 è disponibile in due versioni: con video in bianco e nero e con 
video a colori. In entrambi i casi l'utente può visualizzare una matrice 
di 512 x 256 "pixel" oppure 480 x 256 "pixel", dove il termine " pixel è 
l'abbreviazione di "picture element" (elemento di figura). Un elemento di 
figura è un punto luminoso del video e una riga di punti luminosi co¬ 
stituisce una "s canline ". 

La scelta dell'una o dell'altra modalità di visualizzazione viene fatta 
dall’utente tramite il comando SSYS del PCOS oppure tramite l'istruzione 
U1ND0W (per variare lo spazio tra linee e caratteri). 

Le dimensioni massime dell'immagine su video sono: 225 mm in orizzontale 
e 140 mm in verticale. 


64 colonne x 16 linee 80 colonne x 25 linee 




Figura 14-1 Modalità di visualizzazione (512 x 256 oppure 480 x 256) 

Le linee di testo che compaiono sul video possono contenere un numero 
massimo di 64 o 80 caratteri. Anche lo spazio tra una linea di testo e la 
successiva può variare; sul video può esserci da un minimo di 16 linee 
fino ad un massimo di 25. 

Un M20 con video a colori può essere un sistema a 4 oppure a 8 colori. 
Nella versione a 4 colori, i caratteri e la grafica possono essere 

visualizzati usando quattro colori, scelti tra 8 possibili (tramite 
l'istruzione COLOR - Per selezionare i colori contemporanei). 

Nella versione a 8 colori i caratteri e la grafica possono essere 

visualizzati usando tutti gli otto colori óontemporaneamente. 

Gli otto colori possibili sono: nero, verde, blu, cyan, rosso, giallo, 
magenta, e bianco. 
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In una versione a colori, il colore di fondo del video (detto anche 
colore di background) è nero e il colore di primo piano con cui l'utente 
visualizza i caratteri e la grafica (detto anche colore di foreground) è 
di norma verde. 

Nella versione in bianco e nero, invece, il colore di background è nero 
ed il colore di foreground è bianco. 

Con qualsiasi tipo di video è possibile variare questi due colori, con 
l'uso dell'istruzione COLOR - Per selezione i colori di foreground e di 
background. Ovviamente per il video in bianco e nero è solo possibile 
scambiare i due colori. 

In entrambe le versioni dell'M20, il video può essere suddiviso 
dall'utente in aree rettangolari, chiamate finestre ("windows"). 




FINESTRE 

Su una finestra, l'utente può operare esattamente come sull'intero video; 
su essa può eseguire sia operazioni di grafica sia di testo e possono 
quindi coesistere sia figure sia linee di testo. Le operazioni eseguite 
su finestre diverse sono completamente indipendenti. 

Le dimensioni delle finestre vengono stabilite con l'istruzione W1ND0U 
(per aprire una finestra) descritta in seguito. 

Se viene fatto un tentativo di disegnare una figura o una stringa di 
caratteri di date dimensioni e orientamento (tramite il comando LABEL del 
PCOS) e se questa figura o questa stringa cadono parzialmente fuori dalla 
finestra sulla quale si opera (finestra attuale), solo la porzione che 
cade dentro la finestra viene tracciata e la parte esterna viene ignorata 
("clipped"). 

Supponiamo di eseguire operazioni di grafica ; in questo caso l'utente può 
operare definendo un proprio sistema di coordinate ("coordinate utente") 
adatto al problema da trattare (vedere l'istruzione SCALE) oppure usare 
il sistema di coordinate di default (vedere il paragrafo "Sistemi di 
Coordinate"). 

Nel sistema di coordinate di default l'origine è posta nell'angolo infe¬ 
riore sinistro della finestra, il semi-asse positivo delle x va 
dall'origine verso destra; il semi-asse positivo delle y va dall'origine 
verso l'alto e la finestra viene suddivisa in 512 unità lungo l'asse 
delle x e 256 unità lungo l'asse delle y. Le coordinate di ogni punto 
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sono quindi espresse in coordinate utente, a meno che si operi sull'in¬ 
tero video - non suddiviso in finestre - e sia stata scelta la modalità 
di visualizzazione 512 x 256 (cioè 64 colonne x 16 linee). In questo caso 
soltanto le coordinate di ogni punto sono coordinate "hardware", cioè 
espresse in pixel. Operando con coordinate hardware è possibile 
individuare un pixel specificando le sue coordinate; operando con 
coordinate utente è possible soltanto individuare il pixel che è il più 
vicino alle coordinate specificate. 

Supponiamo di eseguire operazioni su linee di testo . In questo caso 
l'origine (ovvero la posizione in cui verrà visualizzato il primo carat¬ 
tere impostato) coincide con l'angolo superiore sinistro della finestra. 
Le coordinate di ogni carattere di testo vengono, sempre, espresse in 
termine di numero di riga e di numero di colonna, quindi l'angolo 
superiore sinistro corrisponde alle coordinate (1,1). E' possibile, però, 
iniziare a visualizzare un carattere da qualunque altra posizione sul 
video con l'uso dell'istruzione CURSOR (descritta in seguito). 

Le coordinate grafiche sono completamente indipendenti dalle coordinate 
di testo. 

Ogni finestra, in cui il video è stato suddiviso ha due cursori: il 
cursore di testo e il cursore grafico. Entrambi i cursori possono essere 
posizionati e visualizzati dall'utente in qualunque posizione del video 
con l'uso dell'istruzione CURSOR. 

Si osservi, però, che il cursore di testo si sposta automaticamente di 
una posizione ogni volta che un carattere viene impostato; mentre, quando 
viene eseguita un'istruzione di grafica il cursore grafico non si sposta. 

Quando l'utente entra in ambiente BASIC, è presente una sola finestra 
(l'intero video, cioè la finestra numero 1) e il sistema di coordinate è 
quello di default. L'utente può definire (aprire) una nuova finestra come 
una porzione rettangolare di una qualsiasi finestra già esistente. 

Per fare ciò, l'utente deve usare l’istruzione W1ND0W - Per aprire una 
finestra. 11 numero massimo di finestre aperte contemporaneamente è 16. 
11 comando SBASIC del PCOS può allocare spazio in memoria per un 
prefissato numero di finestre. 


14-3 








WINDOW - Per aprire una finestra (PROGRAMMA/1MMED1ATO) 


Apre una nuova finestra, suddividendo la finestra attuale ("current 
window"). Per finestra attuale si deve intendere la finestra sulla quale 
l'utente si trova ad operare. 

Quando si apre una nuova finestra, la finestra attuale che l'ha generata 
è anche detta "parent window" (finestra genitrice). L'istruzione apre, ma 
non seleziona, una nuova finestra (vedere WINDOW - Per selezionare una 
finestra). 



Figura 14-2 Istruzione WINDOW - Per aprire una finestra 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number variable 

è una variabile intera, alla quale il sistema 
operativo assegna un valore, che identifica la 
finestra da aprire. 


Questo valore è un intero da 2 a 16. 1 valori 
vengono assegnati dal sistema in ordine crescen¬ 
te. 


La finestra che inizialmente coincide con 
l'intero video viene identificata con il numero 
1, la prima che viene aperta dall’utente con il 
numero 2 ecc. 
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Supponiamo, ad esempio, che l'utente stia 
operando sulla finestra identificata dal numero 

4 e decida di aprirne un'altra: a questa nuova 
finestra il sistema assegnerà il numero 5, a 
meno che una finestra con il numero 2 oppure 3 
sia stata chiusa (v. istruzione CIOSE W1ND0W) 
perché, in tal caso, alla nuova finestra verrà 
assegnato il più piccolo numero disponibile. La 
finestra 1 non può mai essere chiusa. 

La finestra che ha dato luogo alla nuova 
finestra viene chiamata la finestra "genitrice" 
("parent window"). In questo esempio la finestra 

4 viene detta finestra genitrice. 

Nota: 11 sistema considera l'intero video come 
la finestra principale e, pertanto, gli assegna 
il numero 1, che la identifica sempre, anche se 
in seguito viene suddivisa in altre finestre. 

quadrant 

specifica dove, all'interno della finestra 
"genitrice", la nuova finestra deve essere 
aperta. 

L'utente dispone di quattro possibilità: 

0 nella parte alta della finestra "genitrice" 

1 nella parte bassa 

2 nella parte sinistra 

3 nella parte destra 

position 

individua la posizione, in corrispondenza della 
quale la finestra "genitrice" viene suddivisa 
per dar luogo ad una nuova finestra 

Se il valore del parametro 'quadrant' è 0 oppure 

1, la suddivisione è orizzontale. In questo 
caso, il parametro 'position' è un numero intero 
di "scanline" compreso nell'intervallo, i cui 
estremi sono: 

limite inferiore = 1 


limite superiore = 255 









Nota: La posizione della linea di suddivisione 
(che non viene visualizzata) è, sempre, calcola¬ 
ta a partire dall'alto della finestra genitrice. 

Se "quadrant" vale 2 oppure 3, la suddivisione è 
verticale. In questo caso, il parametro "posi- 
tion" è un numero intero di caratteri, compreso 

nell'intervallo, i cui estremi sono: 

limite inferiore = 1 

limite superiore = larghezza della finestra ge¬ 
nitrice, diminuita di una 

unità. 

Se "quadrant" vale 2 oppure 3, la linea di 
suddivisione (che non viene visualizzata) è 
calcolata a partire dal bordo sinistro della 
finestra genitrice. 

Nota: se "position" è uguale a 1, la finestra 
genitrice viene suddivisa a metà (verticalmente 
oppure orizzontalmente, in funzione del valore 
di quadrant). 

vertical spacing 

è un parametro opzionale, che stabilisce il 
numero di "scanline" per ogni linea di testo 
della finestra da aprire. Ha, come valore 
minimo, 10 (sull'intero video vengono visualiz¬ 
zate 25 linee di testo) e come valore massimo 16 
(16 linee di testo). 


Se vengono omessi sia il parametro vertical 
spacing sia il parametro horizontal spacing, 
viene assunto il vertical spacing della finestra 
genitrice. Se invece viene omesso solo il 
parametro vertical spacing ed il parametro 
horizontal spacing è diverso da quello della 
finestra genitrice, allora il vertical spacing 
viene assunto pari a 16 se 1'horizontal spacing 
è 8 e pari a 10 se l'horizontal spacing è 6. 
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horizontal spacing 


parametro opzionale che stabilisce lo spazio che 
deve essere presente fra due caratteri contigui 
in una linea di testo (per la finestra da 
aprire). Viene espresso in termine di numero di 
'pixel' e può assumere due valori : 6 oppure 8. 


11 primo di questi due valori consente un 
massimo di 80 caratteri per una linea completa 
di testo (sull'intero video), il secondo 64. 


Per default, horizontal spacing assume il valore 
del parametro omonimo della finestra genitrice. 


Note 

Quando una finestra viene aperta il precedente contenuto di quell'area di 
video viene cancellato e, come colori di background e di foreground, 
vengono assunti quelli della finestra genitrice. 


Esempi 


SE l'utente imposta... 


ALLORA... 


A=W1ND0W (0,100) B1 


la suddivisione è orizzontale, la nuova 
finestra viene ad essere la parte alta della 
finestra genitrice. 


L’altezza della finestra da aprire è 100 
scanline. 1 parametri horizontal spacing e 
vertical spacing assumono i valori di default 
(quelli della finestra genitrice). 


14-7 


r 

















A=UI1NOOU(0,100,14) d 

come sopra, con l’unica eccezione che lo spa¬ 
zio fra due linee contigue di testo è di 14 
scanline. 

B=W1NDOW(2,50) CU 

la suddivisione è verticale, la nuova finestra 
viene ad essere la parte sinistra della 
finestra genitrice. La larghezza della fine¬ 
stra da aprire è 50 posizioni di carattere. 


1 parametri horizontal spacing e vertical 
spacing assumono i valori di default. 

A=W1NDOW(0,100) CI 

PR1NT A d 

l'istruzione W1ND0W apre una finestra, che 
l'utente identifica con la variabile A. 11 
sistema operativo assegna un valore intero a 
questa variabile.il contenuto di A viene, poi, 
visualizzato con l'uso dell'istruzione PR1NT 
A. 

A=3:D=40:F=15 :G=8 

W=W1ND0W(A,0,F,G) 

la suddivisione è verticale. La nuova finestra 
è la parte destra della finestra "genitrice”. 
La lunghezza della finestra da aprire è 50 
posizioni di carattere. 


11 parametro vertical spacing vale 15 scanline 
ed ogni linea complèta di testo può contenere 
64 caratteri. 

W2=UIND0W(1,184,16) CI 
W3=W1NDOW(0,50,16) CI 
U4=U1ND0W( 2,16,16) B1 
W5=W1ND0W(3,43,16) «■!:» 

queste istruzioni W1ND0U suddividono il video 
in 5 finestre. Nella figura qui di seguito 
riportata viene indicata la sequenza di questa 
suddivisione 
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Figura 14-3 Sequenza con la quale vengono aperte le finestre 


Note 

Si è visto come l'utente possa specificare, al momento dell’apertura di 
una finestra, sia lo spazio verticale fra linee contigue di testo, sia lo 
spazio orizzontale fra caratteri contigui su una stessa linea. 

In alcuni casi, può risultare necessario variare questi due valori 
relativamente ad una finestra, che è già stata aperta. Questo può essere 
fatto con l'uso della istruzione W1ND0W, ponendo a zero i parametri 
quadrant e position. 


W1ND0U - Per variare lo spazio tra linee e caratteri 

(PR0GRAMMA/IMME01AT0) 


Con questa istruzione non viene aperta alcuna nuova finestra. Viene 
usata, semplicemente, per variare lo spazio fra caratteri e/o lo spazio 
fra linee di testo della finestra attuale. 















































Figura 14-4 Istruzione W1ND0W - Per variare lo spazio tra linee e 
caratteri 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number variable 

è una variabile intera, alla quale il sistema 
assegna il numero della finestra attuale. 

0 

valore del parametro quadrant 

0 

valore del parametro position 

vertical spacing 

è un parametro opzionale, che stabilisce il 
numero di scanline per ogni linea di testo della 
finestra attuale. 


Ha come valore minimo 10 (sull'intero video ven¬ 
gono visualizzate 25 linee di testo) e come 
valore massimo 16 (16 linee di testo). Se vengo¬ 
no omessi sia il vertical spacing sia 
l'horizontal spacing, lo spazio tra le linee 
rimane immutato. 


Se viene omesso solo il vertical spacing e 
l'horizontal spacing ha un valore diverso dal 
valore in vigore per la finestra attuale, il 
vertical spacing sarà 16 se l'horizontal spacing 
è 8 e sarà 10 se l'horizontal spacing è 6. 

— 
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horizontal spacing 


è un parametro opzionale, che stabilisce lo 
spazio fra due caratteri contigui in una linea 
di testo. 


Viene espresso in numero di 'pixel' e può 
assumere due valori: 6 oppure 8. 11 primo di 
questi due valori consente un massimo di 80 
caratteri per una linea completa di testo; il 
secondo 64. 


Se omesso, lo spazio fra caratteri rimane 
immutato. 


Note 

Al momento dell'accensione dell'M20, è presente una sola finestra, che 
coincide con l'intero video e che ha numero 1. 11 parametro horizontal 
spacing ha valore 8 ed il parametro vertical spacing ha valore 16, così 
sull'intero video può essere visualizzato un numero massimo di 16 linee 
di testo, con 64 caratteri per linea (nell’ipotesi di usare un PCOS 
standard). 

L'utente può variare questa modalità di visualizzazione ed avere 25 linee 
di testo con 80 caratteri ciascuna sia usando il comando SSYS del PCOS, 
sia usando l'istruzione WINDOW. In quest'ultimo caso, dopo essere entrato 
in BASIC, l'utente deve usare l'istruzione WINDOW (per variare lo spazio 
tra linee e caratteri) e porre il parametro horizontal spacing uguale a 6 
ed il parametro vertical spacing uguale a 10. 

E' possibile solo avere 64 oppure 80 colonne, ma è possibile variare il 
numero di righe da un minimo di 16 a un massimo di 25, sempre tramite 
questa istruzione WINDOW, variando opportunamente il parametro vertical 
spacing da 16 a 10. 


U1ND0U - Per selezionare una finestra (PROGRAMMA/IMMEDIATO) 


Seleziona la finestra su cui operare. La finestra selezionata diviene la 
finestra attuale. 










< WIND0W y ~©H 


k_» 

window 



expression 



Figura 14-5 Istruzione WINDOW - Per selezionare una finestra 
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ELEMENTO DI SINTASSI 


SIGNIFICATO 

window number 
expression 


è una espressione numerica, il cui valore, 
arrotondato all'intero più vicino, identifica 
una finestra già aperta in precedenza e la 
seleziona. 



11 parametro window number expression può 
assumere solo valori interi da 1 a 16 e deve 
corrispondere ad una finestra esistente, altri¬ 
menti si ha una segnalazione d'errore. 


Esempi 


SE l'utente imposta... 

ALLORA... 

WINDOW %A 

il sistema seleziona la finestra identificata 
dal valore intero, contenuto nella variabile A. 
Se questo valore è noto \ad es.2), l'istruzione 
WINDOW può essere impostata anche nel modo 
seguente: 

WINDOW %2 I4J 

WINDOW V ><*:■ 

il sistema seleziona la finestra identificata 
dal numero 1. Come noto, questa è la finestra 
principale (cioè l'intero video o la finestra 
risultante per successive suddivisioni) 
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CLOSE WINDOW (PROGRAMMA/1MMED1ATO) 


Chiude una finestra specificata o tutte le finestre aperte. 




window 

number 

expression 


-C 


CLOSE WINDOW 


{%) -► 


Figura 14-6 Istruzione CLOSE WINDOW 
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ELEMENTO DI SINTASSI 


SIGNIFICATO 


window number 
expression 


è una espressione numerica, arrotondata all'in¬ 
tero più vicino, il cui valore identifica la 
finestra da chiudere. 


Se .window number expression viene omesso il 
sistema ritorna allo "stato iniziale" (una sola 
finestra: l'intero video). 


Caratteristiche 

L'istruzione CLOSE WINDOW, se eseguita con il parametro window number 
expression, chiude la finestra identificata dal parametro. 

Il sistema assegna l'area della finestra che viene chiusa al rettangolo 
che era stato suddiviso al momento della sua apertura e quest'area viene 
ad avere il colore di background della finestra a cui viene assegnata. 
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Nota 


L'istruzione CLOSE UINDOW, se fatta operare sulla finestra principale, 
non produce alcun effetto. La finestra numero 1 (o finestra principale) 
non può mai essere chiusa. 


USO DEL COLORE 


Come predetto in M20 con video a colori può essere un sistema a 4 oppure 
a 8 colori, a seconda che i colori contemporanei possono essere 4 oppure 
8 . 

11 video a colori è comunque lo stesso: si passa da 4 a 8 colori 
aggiungendo una piastra di memoria e variando opportunamente alcuni 
ponticelli. 

Cor. un video in bianco e nero esiste in memoria una sola matrice di bit 
(Bit-Map) corrispondente ai pixel del video, per cui ogni pixel 
corrisponde a un bit della Bit-Map. 

Con un video a 4 colori esistono in memoria due matrici di bit 
sovrapposte, per cui ogni pixel corrisponde a due bit della Bit-Map. 
Quindi 4 colori possono essere associati a ogni pixel, dato che due bit 
possono generare i numeri da 0 a 3. 

Nella versione a 4 colori l'utente ha la possibilità di visualizzare i 
pixel con 4 colori scelti tra gli 8 possibili, tramite l'istruzione COLOR 
(per selezionare i colori contemporanei). 

Con un video a 8 colori esistono in memoria tre matrici di bit sovrap¬ 
poste, per cui ogni pixel corrisponde a tre bit della Bit-Map. Quindi 8 
colori possono essere associati a ogni pixel, dato che tre bit possono 
generare i numeri da 0 a 7. 

Nella versione a 8 colori l'utente ha la possibilità di visualizzare i 
pixel con tutti gli 8 colori a disposizione. 


Codici di Colore 

La tabella, riportata qui di seguito, elenca i colori dell'M20 e i 
corrispondenti codici di colore ("colour codes"). Questa tabella è valida 
sia per un sistema a quattro che per un sistema a otto colori. 
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CODICE DI COLORE 

COLORE 

0 

nero 

1 

verde 

2 

blu 

3 

cyan (turchese) 

4 

rosso 

5 

giallo 

6 

magenta 

7 

bianco 


Tabella 14-1 


Numeri di Colore 

Molte istruzioni di grafica hanno un parametro detto "numero di colore". 

1 numeri di colore coincidono con i codici di colore in un sistema a 8 
colori. 

In un sistema a 4 colori, invece, i numeri di colore non sono sinonimi 
dei codici di colore, ma ogni numero viene associato a un codice di co¬ 
lore tramite l'istruzione COLOR (per selezionare i colori contemporanei). 
L'associazione (o "mapping") a viene in questo modo: il numero di colore 
può solo essere un numero intero tra 0 a 3 e rappresenta la posizione che 
è stata assegnata a un codice di colore nell'istruzione COLOR predetta: 
essa specifica sempre, alla destra del segno di uguale, 4 codici di 
colore scelti tra gli 8 possibili (il primo codice da sinistra viene 
associato al numero di colore 0, il secondo al numero 1 ecc.). L'istru¬ 
zione COLOR predetta non ha alcun effetto né per un sistema a 8 colori 
(dato che i numeri di colore coincidono con i codici di colore) né per un 
sistema con video bianco e nero, dove il numero di colore è un intero che 
può solo essere 0 (a rappresentare il nero) oppure 1 (a rappresentare il 
bianco). 


Colori di Default 

In un sistema a 4 colori, se l'istruzione COLOR (per selezionare i colori 
contemporanei) non viene eseguita, il sistema assume 4 colori di default 
che sono il nero, il verde, il blu, e il rosso. Si noti che è come se 
fosse stata eseguita l'istruzione: 

COLOR = 0, 1, 2, 4 

In un sistema a 8 colori non esistono colori di default, dato che tutti 
gli 8 colori sono sempre disponibili. 
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Colori di Background e di Foreground 

Ogni finestra ha un colore di background (cioè un colore di fondo) e un 
colore di foreground (cioè di primo piano, ovvero il colore con cui si 
visualizzano i caratteri e le figure, tracciate con istruzioni di grafica 
che non specificano un diverso numero di colore). 

1 colori di background e di foreground possono essere scelti dall'utente 
o assunti per default. 

1 valori di default (sia per un video bianco e nero, sia per un video a 
colori) corrispondono ai numeri di colore 0 (background) e 1 (fore¬ 
ground). A questi numeri sono associati i colori: 

- nero (background) e bianco (foreground) per un video bianco e nero; 

- nero (background) e verde (foreground) per un video a 8 colori; 

- nero (background) e verde (foreground) per un video a 4 colori, se non 
viene eseguita una istruzione COLOR (per la selezione dei colori 
contemporanei). 

Se invece viene eseguita detta istruzione, i colori di background e 
foreground sono rispettivamente il primo e il secondo colore specifica¬ 
ti nell'istruzione. 

L'utente può specificare numeri di colore di background e di foreground 
diversi dai numeri di colore di default tramite l'istruzione COLOR (per 
selezionare i colori di foreground e di background). Con un video bianco 
e nero l'utente può solo invertire i due valori di default e avere quindi 
il bianco come colore di fondo e il nero come colore di primo piano. 


Colore del Cursore 

Ogni finestra na due cursori: uno di testo e uno grafico (vedere para¬ 
grafo "Visualizzazione dei Cursori”). 

Nella versione a 4 colori il colore del cursore (sia di testo che 
grafico) corrisponde all'ultimo codice di colore nell'istruzione COLOR 
(per selezionare i colori contemporanei) oppure è il rosso , se detta 
istruzione non viene eseguita. Infatti, in assenza di detta istruzione, è 
come se fosse stata eseguita l'istruzione: 

COLOR = 0, 1. 2, 4 
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Nella versione a 8 colori il colore del cursore (sia di testo che 
grafico) è sempre il bi anco . 

E' possibile cambiare la forma del cursore, sia grafico sia di testo, con 
l'istruzione CURSOR, ma non è possibile cambiarne il colore (se non per 
un sistema a 4 colori). L'unico modo per cambiare il colore del cursore 
è, limitatamente a un sistema a 4 colori, quello di eseguire un'altra 
istruzione COlOR con un diverso codice di colore in quarta posizione. 


COLOR - Per selezionare i colori contemporanei (PR0GRAMMA/1MMED1AT0) 


Seleziona i quattro colori contemporanei tra gli otto possibili (in un 
sistema con video a 4 colori). 

Con un video bianco e nero o con un video a otto colori questa 
istruzione, se usata, non ha alcun effetto. 



Figura 14-7 Istruzione COLOR - Per selezionare i 4 colori contemporanei 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

colour code 


è una espressione numerica, che assume un valore 
intero da 0 a 7. A ciascuno di questi valori 
corrisponde un colore, come indicato nella 
Tabella 14-1. 



Se l'espressione numerica non dà risultato inte¬ 
ro, questo viene arrotondato all’intero più 
vicino. 
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COLOR - Per selezionare i colori di foregound e di background 
(PR0GRAMMA/1MMED1AT0) 


Seleziona i colori di foreground e di background per una finestra 
specificata. 



Figura 14-8 Istruzione COLOR 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è una espressione numerica il cui valore, 
arrotondato all’intero più vicino, seleziona la 
finestra su cui operare. E’ opzionale. Se 
omessa, il sistema opera sulla finestra attuale. 

foreground colour 

è un numero di colore, che individua e seleziona 
il colore di foreground 

background colour 

è un numero di colore, che individua e seleziona 
il colore di background. Se omesso, il preceden¬ 
te colore di background rimane immutato. 


Caratteristiche 

Sia nella versione con video bianco e nero, sia nelle ver sioni con video a 
4 o a 8 colori, i numeri di colore sono 0 per il colore di background (di 
default) e 1 per il colore di foreground (di default). 

I colori di background e di foreground di una finestra possono essere va¬ 
riati con l'uso della predetta istruzione COLOR per tutti i tipi di 
video. 
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Questa variazione non è di immediata visualizzazione e l'utente, per 
rendersene conto, dopo l'esecuzione dell'istruzione COLOR, deve effettua¬ 
re una delle seguenti operazioni: 

1. Eseguire l'istruzione CLS (descritta in seguito, nel capitolo): in 
questo modo la finestra selezionata assume il nuovo colore di 
background. 

2 . Eseguire l'istruzione PRESET (descritta, in seguito, nel capitolo): 
con l'uso ripetuto di questa istruzione, pixel della finestra sele¬ 
zionata assumono il nuovo colore di background. 

3. Visualizzare un testo: la parte del video, nella quale il testo viene 
visualizzato, assume i nuovi colori di background e di foreground. 


Esempi 


SE l'utente imposta... 

ALLORA... 

COLOR 0,1 

la finestra attuale ha il bianco come colore 
di background e il nero come colore di 
foreground 

COLOR %A,0,1 fcU 

come sopra, ma l'istruzione COLOR opera sulla 
finestra identificata dalla variabile A. 


Note 

Se l'utente imposta COLOR 0.1 invece di COLOR 0,1, i successivi caratteri 
impostati non risultano visibili (dato che 0.1 viene arrotondato a 0). 
Per far nuovamente visualizzare i caratteri, l'utente deve impostare 
CLEAR oppure l'istruzione COLOR predetta in modo corretto. 
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CLS (PROGRAMMA/IMMEDIATO) 


Cancella il contenuto di una finestra selezionata o della finestra 
attuale e la colora con il colore di background. 





Figura 14-9 Istruzione CLS 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è una espressione numerica arrotondata all'inte¬ 
ro più vicino, il cui valore identifica la 
finestra su cui operare. L'uso di questo 
parametro è opzionale. 

Se non viene specificato, l'operazione viene 
eseguita sulla finestra attuale. 


SISTEMI DI COORDINATE 


L'istruzione SCALE consente di scegliere il sistema di coordinate utente 
più idoneo al problema in esame, definendo la trasformazione tra il 
sistema di coordinate di default e il sistema di coordinate prescelto. 

11 sistema di coord inate di default è il sistema di coordinate "hardware" 
(in pixel) solo se il video non è stato suddiviso in finestre ed è stata 
scelta la modalità di visualizzazione 512 x 256 (cioè 64 colonne x 16 
linee), oppure se si è ir, ambiente PCOS. 
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In tutti gli atri casi il sistema di coordinate di default è pur sempre 
un sistema di coordinate utente, nel senso che la finestra viene 
automaticamente suddivisa in 512 unità lungo l'asse delle x e in 256 
unità lungo l'asse delle y e ghe l'origine degli assi è nell'angolo 
inferiore sinistro della finestra. 


Si ricordi che, operando con un sistema di coordinate hardware, è pos¬ 
sibile individuare un pixel specificando le sue coordinate; operando in¬ 
vece con un sistema di coordinate utente è possibile soltanto individuare 
il pixel che è il più vicino alle coordinate specificate. 

Le funzioni SCALEX e SCALEY permettono di ottenere le coordinate hardware 
di un punto qualsiasi del video. 

I valore di ritorno di SCALEX esprime la misura in pixel del segmento 
lungo l'asse x, compreso tra l'origine della finestra attuale (angolo in 
basso a sinistra) e il punto specificato. 

II valore di ritorno di SCALEY esprime la misura in pixel del segmento 
lungo l'asse y, compreso tra l'origine della finestra attuale (angolo in 
basso a sinistra) e il punto specificato. 

L'utilizzo delle funzioni SCALEX e SCALEY può essere utile in vari casi. 
Per esempio è possibile, tramite l'istruzione SCALE e le funzioni SCALEX 
e SCALEY, individuare in modo esatto un singolo pixel anche se si opera 
con un sistema di coordinate utente (cioè se si opera su una finestra che 
non coincida con l'intero video o sull'intero video con modalità di 
visualizzazione 480 x 256). Per far ciò è sufficiente operare la 
trasformazione di coordinate: 


SCALE 0,SCALEX(511),0,SCALEY(255) 

Dopo questa trasformazione infatti qualsiasi valore intero compreso tra 0 
e SCALEX(511) individua l'ascissa di un pixel e qualsiasi valore intero 
tra 0 e SCALEY(255) individua l'ordinata di un pixel della finestra 
attuale. 

Un altro utilizzo tipico delle funzioni SCALEX e SCALEY si ha con il 
comando LABEL del PCOS (richiamabile da BASIC tramite una istruzione CALL 
o EXEC). 11 comando LABEL richiede infatti di esprimere i parametri x-pos 
e y-pos in coordinate hardware e quindi di usare SCALEX e SCALEY se si 
sta operando con coordinate utente. 
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SCALE (PROGRAMMA/IMMEDIATO) 


Consente di scegliere il sistema di coordinate utente più opportuno, de¬ 
finendo la trasformazione tra il sistema di coordinate di default e il 
sistema di coordinate prescelto. 





Figura 14-10 Istruzione SCALE 


Dove 


ELEMENTO DI SINTASSI SIGNIFICATO 


window number è una espressione numerica, arrotondata all'in- 

expression tero più vicino, il cui valore identifica la 

finestra su cui operare. Se omesso, il sistema 
opera sulla finestra attuale. 


x0,x1,y0,y1 dimensioni della finestra: (in coordinate uten¬ 

te) 

x0: ascissa del lato sinistro della finestra 
(cioè x minimo) 

xl: ascissa del lato destro della finestra (cioè 
x massimo) 
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y0: ordinata del lato inferiore della finestra 
(cioè y minimo) 

yl: ordinata del lato superiore della finestra 
(cioè y massimo) 

Nota : x1-x0, y1-y0 possono essere sia positive 
che negative, ma non devono mai essere uguali a 
zero. 


Caratteristiche 

Dopo che è stata eseguita un'istruzione SCALE, ogni volta che si deve 
esprimere un valore di una coordinata, detto valore va impostato in 
coordinate utente. 

11 sistema di coordinate è invece quello di default se: 

- nessuna istruzione SCALE è stata eseguita, oppure 

- è stata eseguita l'istruzione: 

SCALE 0,511,0,255 

11 sistema di coordinate utente scelto con l’istruzione SCALE resta 
valido finché: 

- non viene eseguita un'altra istruzione SCALE, oppure 

- non si esce dall'ambiente BASIC. 


Esempi (Video a 4 colori) 


SE l'utente imposta... 


ALLORA... 

COLOR=3,0,1,5 Iti 

CLS ita 

LINE(0,0) — (511,255) K£a 


l'istruzione LINE (descritta in 
seguito) traccia una linea nera 
su sfondo cyan dal punto di co¬ 
ordinate (0,0) al punto di co¬ 
ordinate (511,255). 



La linea è indicata nella Figu¬ 
ra 14-11. 
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SCALE -1000,1000,-1000,1000 I£! 
LINE (0,0) — (511,255) 


Questa linea è stata tracciata 
usando il sistema di coordinate 
di default, dal momento che nes¬ 
suna istruzione SCALE è stata e- 
seguita in precedenza. 


Con l'uso dell'istruzione SCALE 
viene assunto un nuovo sistema di 
coordinate. 

L'esecuzione della medesima i- 
struzione LINE questa volta trac¬ 
cia una linea diversa (vedere la 
Figura 14-12). 



Figura 14-11 Istruzione LINE 
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Figura 14-12 Istruzioni SCALE e LINE 


SCALEX (PROGRAMMA/IMMEDIATO) | 


Trasforma una coordinata utente nella corrispondente coordinata hardware 
sull'asse delle x della finestra attuale. 

11 valore di ritorno della funzione esprime la misura in pixel del 
segmento, lungo l'asse x, compreso tra l'origine della finestra (angolo 
in basso a sinistra) e il punto in esame. 



Figura 14-13 Funzione SCALEX 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 



coordinate 

è la coordinata utente x del 
misurata sull'asse delle x 
attuale 

punto 

della 

in esame 
finestra 


I SCALEY (PROGRAMMA/IMMEDIATO) 

Trasforma una coordinata utente nella corrispondente coordinata hardware 
sull'asse delle y della finestra attuale. 

11 valore di ritorno della funzione esprime la misura in pixel del 
segmento lungo l'asse y, compreso tra l'origine della finestra (angolo in 
basso a sinistra) e il punto in esame. 



Figura 14-14 Funzione SCALEY 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 



coordinate 

è la coordinata utente y del 
misurata lungo l'asse delle y 
attuale. 

punto 

della 

in esame 
finestra 
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VISUALIZZAZIONE DI PUNTI 

Visualizzare un punto con un dato colore è la funzione grafica più 
elementare e l'utente può far questo con le istruzioni PSET e PRESET. 

L'istruzione P01NT consente invece di conoscere il numero di colore di un 
pixel specificato. 


PSET (PROGRAMMA/IMMEDIATO) 


Attiva con il colore specificato o con il colore di foreground (della 
finestra specificata o della finestra attuale) il pixel di coordinate 
(x,y) specificate oppure, se si è passati in coordinate utente, il pixel 
più vicino alle coordinate (x,y). 



Figura 14-15 Istruzione PSET 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


window number 
expression 


è un' espressione, arrotondata all'intero più 
vicino, che seleziona la finestra sulla quale 
PSET deve operare. Se omessa, viene selezionata 
la finestra attuale. 


».y 


sono le coordinate su cui PSET deve operare. Se 
le coordinate x,y individuano un punto al di 
fuori della finestra, PSET non attiverà il 
pixel, a causa del "clipping". 
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colour 


specifica il numero di colore del pixel da 
visualizzare. Se omesso, il colore usato è 
quello di foreground. 


Nota: 11 parametro colojr dell'istruzione P5ET non fa variare i colori di 
foreground e background della finestra specificata. 


PRESET (PROGRAMMA/IMMEDIATO) 


Attiva con il colore di background (della finestra specificata o della 
finestra attuale) il pixel di coordinate (x,y) specificate, oppure, se si 
è passati in coordinate utente, il pixel più vicino alle coordinate 
(x,y). 



Figura 14-16 Istruzione PRESET 


Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


window number 
expression 


è un'espressione numerica, arrotondata all'inte¬ 
ro più vicino, che seleziona la finestra sulla 
quale PRESET deve operare. Se omessa, viene 
selezionata la finestra attuale 


x,y sono le coordinate su cui PRESET deve operare. 

Se x,y individuano un punto al di fuori della 
finestra, PRESET non attiverà il pixel, a causa 
del "clipping". 
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P01NT (PROGRAMMA/1MMED1ATO) 


Assegna alla variabile alla sinistra del segno di uguale un numero intero 
che rappresenta il numero di colore del pixel di coordinate (x,y) spe¬ 
cificate, oppure del pixel più vicino a dette coordinate, se si è passati 
in coordinate utente. Le coordinate (x.y) devono cadere all'interno della 
finestra attuale. 



Figura 14-17 Funzione P01NT 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

colour number variable 

è una variabile, alla quale il sistema assegna 
un intero che può essere 0 oppure 1 per un 
sistema bianco e nero, che può variare da 0 a 3 
per un sistema a 4 colori e da 0 a 7 per un 
sistema a 8 colori. Questo intero è il numero di 
colore del pixel di coordinate (x,y) specifica¬ 
te, o del pixel più vicino a dette coordinate, 
se si è passati a coordinate utente. 

x,y 

coordinate del pixel di cui si vuole conoscere 
il numero di colore. 
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Esempi 


VIDEO 

COMMENTI 

10 C1RCLE(50,50),20 

traccia una circonferenza sul video con centro 
nel punto di coordinate (50,50) e raggio 20 

20 PSET(50,50) 

attiva con il colore di foreground il pixel di 
coordinate (50,50) oppure il pixel più vicino a 
queste coordinate, se si è passati a coordinate 
utente 

30 A%=PO1NT(50,50) 

assegna un valore intero alla variabile A%: 
detto valore è il numero di colore del pixel 
alle coordinate (50,50) o del pixel più vicino a 
queste coordinate 

40 PR1NT A% 

visualizza il contenuto di A% 


VISUALIZZAZIONE DEI CURSORI 

Ogni finestra ha due cursori: uno di testo e uno grafico. 

11 cursore di testo individua la posizione dove verrà visualizzato il 
successivo carattere impostato. 

La posizione del cursore di testo viene espressa in termini di numero di 
colonna e numero di riga. 

L’utente ha a disposizione la funzione POS (descritta in seguito) per 
conoscere la posizione del cursore di testo. 

11 cursore grafico può essere visualizzato in ogni posizione desiderata. 
Si noti però che la posizione di questo cursore non varia quando si 
eseguono istruzioni di grafica. 

Con l'uso dell’istruzione CURSOR (descritta in seguito), l'utente può 
visualizzare o no uno dei cursori, può variarne la forma e stabilirne la 
frequenza di lampeggio. 

La forma standard del cursore grafico è un rettangolo di 2 pixel per 2 
pixel. 
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Il cursore di testo ha, invece, come forma standard un segno di 
sottolineatura. La visualizzazione di uno dei cursori è possibile solo 
nella finestra su cui si sta operando; appena l'utente seleziona un'altra 
finestra, il cursore visualizzato nella finestra precedente scompare, ma 
viene memorizzato e ogni volta che l'utente ritorna ad operare su quella 
finestra il cursore riappare con le stesse caratteristiche. 

Si noti che quando il cursore di testo viene abilitato, il cursore 
grafico viene automaticamente disabilitato e viceversa; i due cursori non 
possono essere visualizzati contemporaneamente. 


CURSOR (PROGRAMMA/IMMEDIATO) 


Vi sono due formati sintattici diversi per questa istruzione: CURSOR e 
CURSOR POINT. Specificano, rispettivamente, la posizione e le caratteri¬ 
stiche del cursore di testo e del cursore grafico. 



Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

P01NT 

è una parola chiave opzionale. Viene usata se si 
vuole operare sul cursore grafico. Se viene 
omessa, le operazioni vengono eseguite sul 
cursore di testo 





























».y 

specificano dove il cursore deve essere posizio¬ 
nato; se si opera sul cursore di testo x e y 
rappresentano rispettivamente la posizione di 
colonna e di riga. Se. invece, si opera sul 
cursore grafico, x e y rappresentano le coordi¬ 
nate di un punto sul video dove il cursore viene 
posizionato (ed esattamente le coordinate del¬ 
l'angolo in basso a sinistra dell'area rettango¬ 
lare rappresentatne la Bit-Map del cursore - 
vedere parametro "shape"). 

on-off 

stabilisce se visualizzare o no il cursore: 

0= non visualizzare 

1= visualizzare 

rate 

stabilisce se il cursore deve lampeggiare e in 
caso affermativo la freguenza di lampeggio: 

0= non lampeggia 

1-20= freguenza di lampeggi 

shape 

è un parametro opzionale. Permette di variare la 
forma del cursore. E’ il primo elemento di una 
matrice intera unidimensionale a sei elementi 
definita dall'utente. 

Gli elementi di questa matrice (vedere Tabel¬ 
la 14-2 danno la Bit-Map voluta del cursore che, 
sia per il cursore di testo che per il cursore 
grafico, è un rettangolo di 8 pixel (base) per 
12 pixel (altezza). 


Ogni bit della Bit-Map del cursore rappresenta 
un pixel. Il contenuto della Bit-Map del cursore 
viene messo in XOR con il contenuto di guella 
parte della Bit-Map del video che rappresenta 
l'area occupata dal cursore. 
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Esempi 


SE l'utente imposta... 

ALLORA... 

CURSOR PO1NT(80,30) : 

A$=INPUT $ ( 1 ) «:■ 

il cursore grafico viene posiziona¬ 
to nel punto di coordinate (80,30) 

L'istruzione A$=1NPUT$(1) è stata 
impostata affinchè il cursore ri¬ 
manga nella posizione specificata 
fino a quando l'utente non imposta 
un carattere da tastiera. 

CURSOR PO1NT(50,50)1: 

A$=1NPUT$(1 ) KJ 

il cursore grafico viene posiziona¬ 
to nel punto di coordinate (50,50) 
e viene visualizzato 

CURSOR P01NT(50,50)1 ,1 : 

A$=1NPUT$(1 ) BUI 

il cursore grafico viene posiziona¬ 
to nel punto di coordinate (50,50), 
viene visualizzato e ha una fre¬ 
quenza di lampeggio pari ad uno. 

CURSOR (32,8)1 :AS=1NPUT$(1) Iti 

il cursore di testo viene posizio¬ 
nato alla colonna 32 della riga 8; 
viene visualizzato e non lampeggia. 

CURSOR (32,8)1,0,A%(1): 

A$=1NPUT$(1 ) EAM 

come sopra, con l'unica differenza 
che la forma del cursore è stata 
definita dall'utente (una freccia 
rivolta verso l'alto) 
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BIT MAP 

ELEMENTO 

DECIMALE 

ESADEC1MALE 

00010000 

00111000 

A%(1) 

4152 

&H1038 

01111100 

11111110 

A%(2) 

31998 

SH7CFE 

00111000 

00111000 

A%(3) 

14392 

SH3838 

00111000 

00111000 

A%(4) 

14392 

&H3838 

00111000 

00111000 

A%(5) 

14392 

&H3838 

00111000 

00111000 

A%(6) 

14392 

&H3838 


Tabella 14-2 La Bit Map del Cursore 

Nota : Si ricordi che ogni elemento della matrice intera contiene sedici 
bit. 


POS (PROGRAMMA/IMMEDIATO) 


Dà la posizione del cursore di testo nella finestra attuale. 



Figura 14-19 Istruzione POS 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 

variable 


è una variabile numerica, alla quale il sistema 
assegna un valore intero. Questo valore fornisce 
o la posizione di riga o la posizione di colonna 
del cursore di testo (vedere il parametro 
coordinate attribute qui di seguito) 

coordinate attribute 


specifica se nella variabile deve ritornare il 
valore relativo alla posizione di riga o alla 
posizione di colonna. 



0 = posizione di colonna 
<>0 = posizione di riga. 


COME TRACCIARE FIGURE 


La grafica dell'M20 comprende istruzioni che permettono all'utente di 
tracciare linee e rettangoli (istruzione LINE), circonferenze (istruzione 
CIRCLE) e figure qualsiasi (istruzione DRAW) e di colorare l'area 
racchiusa da una figura chiusa (istruzione PAINT). 
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LINE (PR0GRAMMA/IMMED1AT0) 


Traccia una linea o un rettangolo in-un determinato colore. L'utente ha 
la facoltà di colorare la superficie del rettangolo. 



Figura 14-20 Istruzione LINE 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è un'espressione numerica intera, che individua 
e seleziona la finestra sulla guale l’istruzione 
LINE deve operare. Se omessa, l'istruzione LINE 
opera sulla finestra attuale. 

STEP 

è una parola chiave opzionale. Consente l'uso di 
coordinate relative. Con l'uso di STEP le 
coordinate (x.|,y ) (coordinate iniziali) diven¬ 
gono relative all'ultimo punto tracciato o (in 
assenza di questo) all'angolo inferiore sinistro 
della finestra. Le coordinate (x^.y^) ^ c0_ 
ordinate finali) divengono, invece, relative al 
punto d'inizio della linea (o del rettangolo) 
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YVì 

sono le coordinate del punto iniziale della 
linea. Se omesse, la linea inizia dall'ultimo 
punto tracciato o, in assenza di questo, 
dall'angolo inferiore sinistro della finestra. 

X 2 ,y 2 

sono le coordinate del punto finale della linea 

colour 

un numero di colore, che individua il colore con 
il quale deve essere tracciata la linea o il 
rettangolo. 11 valore di default è il colore di 
foreground della finestra attuale. 

B (Box) 

è un parametro opzionale, con l’uso del quale è 
possibile tracciare un rettangolo. 11 rettangolo 
(con i lati paralleli ai bordi della finestra) 
ha come diagonale, il segmento di coordinate (x^ 

’V e <V y 2 } 

F (Filled) 

è un parametro opzionale, da usare solo con il 
parametro B. 'BF' traccia un rettangolo, la cui 
superficie viene colorata con il colore specifi¬ 
cato nel parametro colour, o con il colore di 
foreground. 

action verb 

è un parametro opzionale, che può assumere i 
seguenti valori: AND, XOR, OR, NOT, PSET, 
PRESET. L’opzione PSET fa in modo che la linea o 
il rettangolo vengano tracciati nel colore 
indicato. Le opzioni AND, OR e XOR indicano che 
il colore con cui tracciare la linea o il 
rettangolo è il risultato della corrispondente 
operazione logica fra il numero di colore della 
linea o del rettangolo e il numero di colore dei 
pixel già presenti su video. Questa operazione 
viene ripetuta per ogni punto della linea o del 
rettangolo. 

L'opzione NOT indica che il colore della linea o 
del rettangolo è il complemento del numero di 
colore dei pixel già presenti su video. Con 
l'operazione PRESET la linea o il rettangolo 
vengono tracciati con il colore di background 
della finestra selezionata. Il valore di default 
del parametro action verb è PSET. 
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Esempio (Video a 4 colori) 


VIDEO 


COMMENTI 


10 C0L0R=4,2,4,5 
20 CLS 

30 LINE(206,100)-(306,100) 
40 L1NE(256,200) 

50 LINE STEP(—50,—100) 

60 PA1NT(256,150) 


questo programma disegna su un colore di 
background rosso un triangolo isoscele di 
colore blu (v. Figura 14-21). 

L'istruzione PAINT viene descritta nel 
seguito. 



Figura 14-21 Disegno di un triangolo 


Nota 

Se i parametri specificati per tracciare una linea o un rettangolo sono 
tali che una parte della linea o del rettangolo cade al di fuori dei 
confini della finestra, solo la parte interna alla finestra viene 
visualizzata e la parte esterna viene ignorata ("clipped"). 
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C1RCLE (PROGRAMMA/IMMEOIATO) 


Traccia una circonferenza in un dato colore, specificando le coordinate 
del centro e il raggio. 



Figura 14-22 Istruzione C1RCLE 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è un'espressione numerica, arrotondata all'inte¬ 
ro più vicino, che seleziona la finestra sulla 
quale l'istruzione C1RCLE deve operare. Se 
omessa, viene selezionata la finestra attuale. 

x.y 

sono le coordinate del centro della circon¬ 
ferenza 

r 

è il raggio della circonferenza 

colour 

è un numero di colore che individua il colore 
con cui disegnare la circonferenza, il valore di 
default è il colore di foreground della finestra 
selezionata 
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aspect ratio 


action verb 


a causa della diversa densità dei pixel su video 
lungo l'asse x e l'asse y, l'utente può 
specificare un valore (numero reale positivo) di 
questo parametro, al fine di poter tracciare un 
cerchio collegando all'M20 un video diverso da 
quello standard. 11 parametro è opzionale. 11 
valore di default è 0.807 e dà luogo ad una 
circonferenza con un video M20 standard. 


è un parametro opzionale. Può assumere uno dei 
valori seguenti: AND, XOR, OR, NOT, PSET, 
PRESET. Ognuna di queste opzioni definisce 
l'operazione da eseguire su ogni punto della 
circonferenza. 


L'opzione PSET traccia la circonferenza nel 
colore indicato. 


Le operazioni AND, OR e XOR indicano che il 
colore con cui tracciare la circonferenza è il 
risultato della corrispondente operazione logica 
fra il colore indicato o assunto per default e 
quello dei pixel già presenti su video. 

L'operazione NOT indica che il colore della 
circonferenza è il complemento del colore dei 
pixel già presenti su video. Con l'opzione 
PRESET la circonferenza viene tracciata con il 
colore di background della finestra selezionata. 
11 valore di default del parametro action verb è 
PSET. 




Nota 

Quando si usa una istruzione SCALE, il parametro aspect ratio non viene 
modificato e il parametro r viene determinato in funzione dell'unità di 
misura sull'asse delle x. 
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Esempio (Video a 4 colori) 


VIDEO 

COMMENTI 

10 C0L0R=2,4,5,0 

11 programmi disegna tre cerchi che 

20 CL5 

si intersecano. 11 colore di fondo è 

30 C1RCLE(100,120),90 

il blu, quello delle circonferenze è 

40 C1RCLE(150,130),120 

il colore di foreground (rosso) e 

50 C1RCLE(250,120),100 

l'area comune ai tre cerchi viene 

60 PAINT(180,120) 

colorata (tramite la PAINT) sempre 
con il colore di foreground. (Vedere 
Figura 14-23). 

L'istruzione PAINT viene descritta 
nel seguito. 



Figura 14-23 Cerchi che si intersecano 
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DRAU (PROGRAMMA/IMMEDIATO) 


Il video può essere pensato come un foglio di carta sul quale poter far 
scorrere una ipotetica penna chiamata penna virtuale ("Virtual pen"). 
Questa penna può essere spostata dall'utente in qualsiasi posizione del 
video e, nel far questo, può disegnare (pen down) oppure no (pen up). 

L'istruzione DRAU sposta la penna virtuale in qualsiasi posizione 
all'interno di una finestra e può tracciare linee di un colore 
specificato. 


DRAW 






J .fo/i 

window 

number 

expression 



command 


*1/0 1 ► 


string 



Figura 14-24 Istruzione DRAW 


Dove 


ELEMENTO DI SINTASSI 


window number 
expression 


command string 


SIGNIFICATO 


è un'espressione numerica intera, che 
individua e seleziona la finestra, 
sulla quale DRAW deve operare. 11 
valore di default è la finestra 
attuale. 


può essere o una variabile stringa o 
una costante stringa. In entrambi i 
casi, la stringa è formata da uno o 
più comandi (elencati nella tabella 
Comandi); questi comandi controllano 
il movimento della "penna virtuale". 


Tutti i comandi, ad eccezione del 
comando C, possono essere preceduti 
dall'opzione B, che impedisce di 
disegnare su video (e quindi ha la 
funzione di "pen up") e possono 
essere seguiti da una delle seguenti^ 
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opzioni: AND, XOR, OR, NOT, PSET, 
PRESET. Ognuna di queste opzioni 
individua la corrispondente operazio¬ 
ne, che viene eseguita su ciascun 
punto della linea. Queste opzioni 
vengono specificate con la prima 
lettera del nome; unica eccezione, 
l'opzione PRESET, che viene specifi¬ 
cata con la lettera R. 

L’opzione P (cioè PSET) traccia la 
figura nel colore indicato. Le opzio¬ 
ni A (cioè AND), 0 (cioè OR), e X 
(cioè XOR) indicano che il colore 
della figura è il risultato di 
un'operazione logica fra il colore 
indicato e il contenuto precedente 
del video. 

L'opzione N (cioè NOT) indica che il 
colore della figura è il complemento 
del contenuto del video. 

L'opzione R (cioè PRESET) traccia la 
figura nel colore di background. 

11 valore di default è P. 


Nota : 1 parametri dei comandi (dx,dy,x,y e colour) possono essere 
espressi come variabili. In questo caso, i nomi delle variabili devono 
essere scritti fra segni di uguale. Vedere gli esempi qui di seguito. 


Comandi 


M dx,dy 


J x,y 


COMANDO 


SIGNIFICATO 


sposta la penna dalla posizione 
attuale (diciamo a,b) alla posizione 
indicata da (a+dx,b+dy). 


sposta la penna nella posizione 
indicata da (x,y). 

-► 
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U dy 

sposta la 
posizioni. 

penna in alto di dy 

D dy 

sposta la 
posizioni. 

penna in basso di dy 

L dx 

sposta la 
posizioni. 

penna a sinistra di dx 

R dx 

sposta la 
posizioni. 

penna a destra di dx 

C colour 

stabilisce il colore con cui traccia¬ 
re le linee. 

Dopo l'opzione C deve essere specifi¬ 
cato un numero di colore. 

Se l'opzione C non viene specificata, 
viene assunto l'ultimo colore usato 
in una precedente istruzione DRAW 
oppure il colore di foreground della 
finestra attuale. 


Esempi 


VIDEO 

COMMENTI 

90 PSET(10,20) 

100 X=23 

l'istruzione 90 attiva il punto 
(10,20) con il colore di foreground. 

130 DRAW 

"M=X=,25" 

L'istruzione 100 pone X=23 



L'istruzione 130 traccia una linea 
dalla posizione attuale della penna 
(10,20) alla posizione (33,45), cioè 
(10+23,20+25) 
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250 A$="8M 10,2 
D 20 MR 15,-3" 


l'istruzione 
bile A$ la 
comandi: 


250 assegna alla varia- 
seguente stringa di 


-il comando M con l'opzione B per 
spostare la penna senza disegnare 
("pen up") dalla sua posizione 
attuale (diciamo a,b) alla posizio¬ 
ne (a+10,b+2). 

- il comando D per spostare la penna 
in basso di 20 posizioni cioè fino 
al punto (a+10,b-18) 

- il comando M per spostare la penna 
dalla sua posizione attuale (a+10, 
b—18) al punto (a+25,b-21). 

L'opzione R (PRESET) indica che la 
linea deve essere tracciata nel 
colore di background. 


260 DRAW A$ 


l'istruzione 260 esegue la sequenza 
dei comandi, specificati nella varia¬ 
bile A$. 


Nota 

La sequenza di comandi in una istruzione DRAW può essere impostata sia in 
lettere minuscole che in lettere maiuscole. 1 comandi possono essere 
separati l'uno dall'altro da spazi, ma possono anche essere contigui. 
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Esempio (Sistema a 8 colori) 


VIDEO 


10 CLS 

20 DRAM "bj0,0" 

30 X=511:Y=255 
40 K=0 

50 FOR 1=1 TO 23 

60 GOSUB 170 

70 DRAW "u=y=":Y=Y-5 

80 GOSUB 170 

90 DRAW "r=x=":X=X-10 

100 GOSUB 170 

110 DRAW "d=y=":Y=Y-5 

120 GOSUB 170 

130 DRAW "l=x=":X=X-10 

140 NEXT 

150 A$=1NPUT$(1) 

160 END 

170 COL=(K MOD 7)+1 

180 K=K+1:DRAW "c=col=":RETURN 


COMMENTI 


11 programma disegna una spezzata 
partendo dal punto di coordinate 
0,0 (vedi istruzione 20). 

Detto punto si trova nell'angolo 
inferiore sinistro del video, dato 
che non è stata usata un'istruzione 
SCALE. 

La subroutine alle linee 170 e 180 
consente di cambiare il colore 
della linea da disegnare (sceglien¬ 
do un numero di colore tra 1 e 7 - 
escludendo quindi il nero, che è il 
colore di background). Questa sub¬ 
routine viene attivata -ogni volta 
che viene tracciata una linea. 

La prima istruzione dalla linea 70 
traccia una linea verso l'alto di Y 
unità e la seconda istruzione 
decrenenta il valore di Y di 5 
unità. 

La prima (istruzione alla linea 90 
traccia una linea verso destra di X 
unità e la seconda istruzione 
decrementa il valore di X di 10 
unità. 

La prima istruzione alla linea 110 
traccia una linea verso il basso di 
Y unità e la seconda istruzione 
decrementa il valore di Y di 5 
unità. 

La prima istruzione alla linea 130 
traccia una linea verso sinistra di 
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X unità e la seconda istruzione 
decremento il valore di X di 10 
unità. 

11 numero di linee da tracciare 
viene controllato da un loop con 
una variabile di controllo 1 che va 
da 1 a 23. Questo loop consente 
quindi di tracciare una spezzata di 
23 x 4 = 92 segmenti, ognuno di 
colore diverso (vedere Figura 
14-25). 
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PAINT (PROGRAMMA/IMMEDIATO) 


Colora l'intera finestra o una sua porzione purché delimitata da un con¬ 
torno chiuso di un dato colore oppure del colore di foreground. 11 siste¬ 
ma inizia a colorare dal pixel di coordinate (x,y) specificate, oppure, 
se si è passati in coordinate utente, dal pixel più vicino alle 
coordinate (x,y). 




’ Ho—| 


1 i——if r—i] 

- —» colou» -• bcolour ■ -» 


Figura 14-26 Istruzione PAINT 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è un'espressione numerica il cui valore, arro¬ 
tondato all’intero più vicino, seleziona la 
finestra sulla quale l'istruzione PAINT deve 
operare. Se questo parametro è omesso viene 
selezionata la finestra attuale. 

x,y 

sono le coordinate del punto dal quale il 
sistema inizia a colorare 

colour 

è un numero di colore che specifica come 
colorare la finestra o una sua porzione, 
delimitata da un contorno chiuso. 11 valore di 
default è il colore di foreground 
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bcolour 


è un numero di colore, che specifica il colore 
del bordo che delimita la figura da colorare. 
11 valore di default è il colore di foreground. 


Nota 

Per colorare una figura delimitata da un contorno chiuso, l'utente si 
assicuri che le coordinate x e y cadano all'interno della figura. Se 
vengono a trovarsi al di fuori del bordo della figura, il sistema colora 
soltanto la parte di finestra esterna alla figura medesima. 

Per poter utilizzare in modo adeguato l'istruzione PAINT, il bordo della 
figura deve essere tutto di uno stesso colore (quello specificato dal 
parametro bcolour, oppure il colore di foreground se detto parametro è 
omesso). Per esempio, se si vuole colorare una corona circolare, le due 
circonferenze che la delimitono devono essere dello stesso colore. 

Se invece i colori delle due circonferenze sono diversi e: 

- il colore specificato dal parametro bcolour è quello della circonferen¬ 
za esterna, la PAINT colora tutto il cerchio delimitato dalla circon¬ 
ferenza esterna; 

- il colore specificato dal parametro bcolour è quello della circonferen¬ 
za interna, la PAINT colora tutta l’area esterna alla circonferenza in¬ 
terna, fino ai limiti della finestra o fino a incontrare un contorno 
dello stesso colore della circonferenza interna. 
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Esempio (Video a 4 colori) 


V1DF0 


COMMENTI 


10 C0L0R=2,5,4,0 
20 CLS 

30 C1RCLE(256,128),130,2 

40 PAINT(256,128),1,2 

50 LINE(251,123)-STEP(10,10,),3,BF 


L’istruzione 10 seleziona quattro 
tra gli otto colori disponibili. 
L'istruzione 20 cancella il con¬ 
tenuto del video e lo colora con il 
colore di background (in questo caso 
il blu). L'istruzione 30 traccia una 
circonferenza con un raggio di 130 
il cui centro è un punto di coordi¬ 
nate (256,128) e colora la circonfe¬ 
renza di rosso. L'istruzione 40 
colora il cerchio di giallo. L'i¬ 
struzione 50 disegna un rettangolo 
nero al centro del cerchio (v. 
Figura 14-27) 





Figura 14-27 Disegno di un cerchio con un rettangolo al centro 
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Esempio (Video a 8 colori) 


VIDEO 


10 

CLS 



20 

FOR 1= 

1 TO 7 


30 

COLOR 

1,0 


40 

C1RCLE(256,128),110-1*10 


50 

C1RCLE 

(256,128),110—(1—1 

) *10 

60 

PAINT 

( 256—110- (1-.5)*10, 

128) 

70 

NEXT 




COMMENTI 


Questo programma traccia 7 corone 
circolari concentriche. 11 centro 
è nel punto (256,128), cioè coinci¬ 
de con il centro del video. 

11 colore di background è il nero 
(dato che il secondo parametro 
dell'istruzione COLOR alla linea 30 
è 0) e il colore di foreground 
cambia al variare della variabile 
di controllo I, da 1 (verde) a 7 
(bianco). 


Le corone circolari vengono colora¬ 
te tramite l'istruzione PAINT (alla 
linea 60). Le coordinate del punto 
dal quale il sistema inizia a 
colorare sono state scelte in modo 
che il punto stesso cada sempre 
lungo la parallela all'asse x 
passante per il centro, ed è 
l'estremo del raggio medio della 
corona. 

Il colore della corona e quello dei 
cerchi che la delimitano non sono 
specificati nell'istruzione PAINT, 
quindi, per default, coincidono con 
il colore attuale di foreground. 

Vedere Figura 14-8 










figura 14-28 Corone concentriche 


COME MEMORIZZARE E VISUALIZZARE FINESTRE E RETTANGOLI 


L'utente può memorizzare in una matrice intera unidimensionale il conte¬ 
nuto di una finestra o di un'area rettangolare all'interno di una fine¬ 
stra, con l'uso dell'istruzione GET, oppure con l'istruzione PUT può 
trasferire su video l'immagine di un'area rettangolare, precedentemente 
memorizzata in una matrice intera unidimensionale. 


GET - Grafica (PROGRAMMA/IMMEDIATO) 


Memorizza un'intera finestra o un qualsiasi rettangolo all'interno di una 
finestra in una matrice unidimensionale ad elementi interi (16 bit per 
elemento). 
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Figura 14-29 Istruzione GET - Grafica 


Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è un'espressione numerica, arrotondata all'inte¬ 
ro più vicino, che seleziona la finestra sulla 
quale GET deve operare. Il valore di default è 
la finestra attuale. 

V y i 

*2’ y 2 

sono le coordinate che definiscono la diagonale 
del rettangolo da memorizzare 

array element 

il primo elemento utilizzabile della matrice 
unidimensionale, usata nell’istruzione GET. 

11 sistema utilizza gli elementi della matrice 
nel modo seguente: 

- il primo elemento contiene la base del 
rettangolo; 

- il secondo contiene l’altezza; 

- il valore del terzo elemento stabilisce se 
l'immagine da memorizzare è in bianco e nero o 
a colori. 

1 successivi elementi della matrice (ciascuno 
atto a contenere 16 bit) contengono i bit di 
quella sezione della Bit Map del video che 
corrisponde al rettangolo considerato. 
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L'utente deve dimensionare la matrice unidimen¬ 
sionale, usando l'istruzione DIM. La formula se¬ 
guente permette di calcolare il numero minimo di 
elementi della matrice: 

(( k^ e j x altezza)xDT)+3 


dove: 

base e altezza sono espresse in pixel 

DT = 1 con un video bianco e nero 

DT = 2 con un video a 4 colori 

DT = 3 con un video a 8 colori 

1 significa prendere 1'intero>= (sempre ar¬ 
rotondato verso l'alto) 


PUT - Grafica (PROGRAMMA/IMMEDIATO) 


Visualizza un'immagine, precedentemente memorizzata con l'uso dell'i¬ 
struzione GET in una matrice unidimensionale ad elementi interi (16 bit 
per elemento). 



Figura 14-30 Istruzione PUT - Grafica 
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Dove 


ELEMENTO DI SINTASSI 

SIGNIFICATO 

window number 
expression 

è un'espressione numerica intera, che individua 
e seleziona la finestra sulla quale deve operare 
l'istruzione PUT. 11 valore di default è la 
finestra attuale. 

V y i 

X 2' V 2 

sono le coordinate che definiscono la diagonale 
del rettangolo memorizzato nella matrice unidi¬ 
mensionale, rettangolo il cui contenuto deve es¬ 
sere portato su video. Se la diagonale definita 
da queste coordinate individua su video un ret¬ 
tangolo di dimensioni diverse da quello memoriz¬ 
zato nella matrice, viene visualizzato il 
rettangolo minore. 


Se le coordinate x^ e y^ sono omesse, il ret¬ 
tangolo memorizzato viene visualizzato a partire 
dal punto x e y (vertice superiore a sini¬ 
stra). 

array element 

è il primo elemento della matrice unidimensiona¬ 
le, che contiene l'informazione memorizzata con 
una istruzione GET. 

action verb 

è un parametro opzionale, che può assumere i 
seguenti valori: AND, XOR, OR, NOT, PSET, 
PRESET. Ognuna di queste opzioni definisce 
l'operazione corrispondente, da eseguire su ogni 
pixel contenuto all'interno dell’area rettan¬ 
golare. 


L'opzione PSET indica che il rettangolo visua¬ 
lizzato è, semplicemente, quello memorizzato 
nella matrice. 


Le operazioni AND,OR e XOR stanno invece ad 
indicare che il rettangolo visualizzato è il 
risultato di un'operazione logica fra i numeri 
di colore dei pixel contenuti nella matrice e i 
numeri di colore dei pixel preesistenti in 
quell'area rettangolare di video. 












L'opzione NOT indica che sarà fatto il 
complemento dei numeri di colore dei pixel 
presenti su video. L'opzione PRESET, invece, 
indica che sarà fatto il complemento dei numeri 
di colore dei pixel contenuti nella matrice. 

11 valore di default del parametro action verb è 
PSET. 


Esempio (Video a 4 colori) 


VIDEO 


COMMENTI 


1 COLOR=2,4,5,0 
5 DIM B%(2000) 

10 CLS:C1RCLE(256,128),80,3 
20 LINE(190,60)-(350,195),,BF,X0R 
30 GET(190,60)-(360,128),B%(0) 

50 CLS:PUT(250,220),B%(0) 


L'istruzione 5 dimensiona la ma¬ 
trice da usare per memorizzare le 
scanline del rettangolo. 

La linea 10 cancella quanto conte¬ 
nuto su video, lo colora con il co¬ 
lore di background (blu) e traccia 


una circonferenza di colore nero. 


L'istruzione 20 traccia un rettan¬ 
golo sovrapposto al cerchio (vedere 
la Figura 14-31) e lo colora di 
rosso. Infatti l'operazione di XOR 
tra 0 (blu), il nume,o di colore di 
background, e 1 (rosso), il numero 
di colore di foreground, è 1 (ros¬ 
so). La parte della circonferenza 
all'interno del rettangolo viene 
colorata in giallo. Infatti l'ope¬ 
razione di XOR tra il numero di 
colore 3 e il numero di colore di 
foreground 1, dà il numero di colo¬ 
re 2. 


L'istruzione 30 memorizza una parte 
di video nella matrice B%. 


La linea 50 cancella quanto con¬ 
tenuto su video e visualizza l'area 
rettangolare precedentemente memo¬ 
rizzata (vedere la Figura 14-32). 
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Figura 14-31 L'immagine su video, dopo l'esecuzione delle istruzioni 10 
e 20. 
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PRESTAZIONI GRAFICHE FORNITE DAL PCOS 


11 PCOS permette all'utente di scegliere la modalità di visualizzazione 
(256 x 512 o 256 x 480 pixel) tramite il comando SSYS e di preallocare 
spazio in memoria per un certo numero di finestre tramite il comando 
SBAS1C. (11 PCOS non consente però di aprire, chiudere o selezionare 
finestre; queste operazioni possono essere fatte solo in BASIC o in 
ASSEMBLER). 

Inoltre i comandi LABEL, SPRINT, LSCREEN, RFONT e UFONT del PCOS, e i 
parametri +cc e -cc consentono di realizzare alcune importanti funzioni 
di grafica: 

- 11 comando LABEL visualizza, con il colore specificato, stringhe di 
caratteri di dimensione e orientamento variabili nell'ambito dell'inte¬ 
ro video o di una data finestra (se richiamato da BASIC); 

- 11 comando SPRINT riproduce in stampa l'immagine dell'intero video o di 
una data finestra (se richiamato da BASIC); 

- 11 comando LSCREEN riproduce in stampa tutti i caratteri presenti 
sull'intero video o in una finestra (se richiamato da BASIC); 

- 1 comandi RFONT e UFONT (unitamente al Video File Editor) consentono di 
creare font di caratteri definiti dall'utente; 

- 1 parametri +cc e -cc consentono di visualizzare i primi 32 caratteri 
della tabella ASCII (codici esadecimali da 00 a 1F). 

Per maggiori dettagli sull'uso di questi comandi e di questi parametri, 
vedere il "Professional Computer Operating System (PCOS) - Guida Utente". 
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A. CODICI ASCII 




La tabella seguente rappresenta in codice decimale, esadecimale e 
binario i caratteri ASCII. 


a 

b 

C 

d 

a 

b 

C 

d 

a 

b 

C 

a 

6 

C 

0 

00 

00000000 

NHL 

84 

40 

0100 0000 

$ 

ITI 

M 

1000 0000 

192 

OD 

1100 oooo 

i 

01 

00090001 

SOM 

II 

41 

0100 0001 

A 

124 

61 

10000001 

19) 

Cl 

iiooooo: 

2 

07 

00000010 

sn 

*4 

47 

0100 0010 

B 

HO 

87 

1000 OOIO 

1*4 

C2 

1100 OOIO 

» 

0) 

00000011 

ETX 

67 

41 

0100 0011 

C 

III 

• 1 

1000 0011 

197 

C» 

1100 oou 

« 

04 

0000 0100 

tOT 

14 

64 

01090100 

0 

112 

*4 

1000 0100 

196 

C4 

1 IOOO 100 

» 

•> 

0000 0101 

ENQ 

64 

41 

0100010! 

E 

111 

17 

10000101 

197 

C7 

IIOOOIOl 

* 

00 

00000110 

AOC 

70 

41 

oiooono 

f 

114 

66 

laooono 

1*6 

C6 

nooouo 

» 

07 

OOOOOIII 

KL 

71 

47 

0100 OHI 

C 

1)7 

17 

IOOOOIII 

194 

C7 

IIOOOIII 

• 

01 

0000 1000 

as 

77 

46 

01001000 

li 

ITI 

UH 

1000 1000 

TOC 

C8 

IlOO 1000 

* 

04 

0000 tool 

HT 

71 

44 

0100 IOOI 

1 

117 

64 

iooo iooi 

201 

c» 

noo iooi 

IO 

OA 

0000 1010 

LF 

74 

4A 

0100 1010 

' 

IM 

6A 

1000 1010 

202 

CA 

noo 1010 

II 

00 

0000 1011 

VI 

77 

4B 

oiao lon 

k 

in 

88 

1000 1011 

20‘ 

CB 

noo ioii 

>2 

oc 

0000 1100 

FF 

76 

4C 

0100 1100 

L 

I4C 

8C 

iooo noo 

204 

CC 

noo noo 

11 

OD 

oooo noi 

c* 

n 

4D 

0100 noi 

M 

141 

6D 

iooo noi 

207 

CD 

noo noi 

14 

oE 

*100 IMO 

70 

7* 

4t 

0100 II 10 

N 

142 

6E 

iooo ino 

2M 

et 

1100 11 IO 

11 

oF 

0000 1111 

SI 

74 

42 

oiooim 

O 

14) 

8F 

1000 1111 

207 

et 

uooun 

U 

IO 

0001 9000 

Dtf 

Kl 

70 

0101 0000 

P 

144 

90 

10010000 

20» 

DO 

uoioooo 

17 

II 

00010001 

DG 

•1 

11 

0101 0001 

0 

147 

41 

1001 0001 

204 

DI 

noi ooot 

II 

12 

00010010 

DG 

62 

77 

0101 0010 

H 

144 

42 

IOOI 0010 

2I( 

D2 

noi ooio 

1* 

1) 

0001 0011 

DC. 

II 

11 

01010011 

s 

147 

4» 

1001 0011 

211 

DI 

noioou 

20 

14 

0001 0100 

DC. 

64 

14 

0)010100 

T 

14» 

44 

IOOI 0100 

212 

IX 

noi oioo 

21 

17 

0001 0101 

NAK 

*7 

17 

01010101 

U 

144 

47 

10010101 

21» 

D7 

noi OIOI 

22 

II 

0001 Olio 

SYN 

66 

76 

010101 IO 

V 

ITO 

46 

iooi ono 

214 

tu 

noi ono 

21 

1» 

OQOIOIIi 

ETB 

•7 

77 

010101 II 

4F 

ITI 

97 

IOOI OHI 

219 

D7 

noi OHI 

74 

II 

(■noi 1000 

LAN 

61 

76 

0101 1000 

l 

172 

II 

IOOI IOOO 

2U 

DI 

noi iooo 

2» 

1* 

0001 1001 

l-M 

66 

74 

oioi iooi 

Y 

17) 

4» 

IOOI IOOI 

21? 

D* 

noi IOOI 

2* 

IA 

0001 Itili! 

SUB 

40 

7A 

0101 1010 

l 

174 

9A 

1001 1010 

219 

DA 

noi ioio 

27 

IO 

0001 1011 

ESC 

41 

7B 

oioi lon 

“P 

177 

9B 

1001 1011 

714 

» 

noi ioii 

21 

tc 

0001 1100 

FS 

42 

7C 

oioi noo 


174 

4C 

IOOI noo 

220 

DC 

noi noo 

n 

ID 

oooi noi 

GS 

41 

7D 

oioi noi 

fi 

177 

9D 

iooi noi 

»> 

Dt 

noi noi 

IO 

11 

onoi Ilio 

as 

44 

71 

oioi ino 

» 

174 

4E 

IOOI ino 

m 

Dfc 

noi MIO 

M 

ir 

0001 mi 

US 

47 

7F 

oioi mi 

- 

174 

4F 

iooi mi 


DF 

noi imi 

»2 

TU 

0010 0000 

SF»Ct 

46 

60 

oiiooooo 

□ 

I6C 

AD 

10100000 


LO 

11100000 

»» 

21 

OOIDOOOI 

! 

47 

II 

0110 000) 


III 

Al 

1010000] 

22* 

Kl 

IIIOOOOI 

>4 

22 

00 IO OC IO 

- 

«6 

12 

oi io ooio 

k 

112 

A2 

toioooio 


E2 

Il IO OOIO 

>7 

21 

odio oou 


44 

II 

onoiwn 


III 

A) 

ioio non 


E) 

niooon 


24 

OOIOOIOO 

tr 

100 

64 

Olio 0100 

è 

164 

A4 

10100100 


E4 

IIIOOIOO 

»7 

27 

OOIOOIOI 

H 

101 

67 

0II00I0I 


167 

A7 

10100101 

224 

E» 

UIOOIOI 

>1 

21 

OOIOOIIO 

* 

102 

86 

0110 01 IO 

1 

164» 

Al 

loioono 

« 

El 

uioono 

Yt 

27 

OOIOOIII 


101 

67 

oiiooiii 

i 

167 

A7 

IO IO 01 II 

;m 

E7 

limoni 

*0 

2* 

0010 1000 

1 

104 

M 

Olio 1009 

k 

166 

A» 

1010 1000 

»> 

£8 

1110 1000 

41 

2* 

0010 1091 

1 

107 

64 

01 IO IOOI 


164 

A4 

1010 IOOI 

2» 

F* 

ino iooi 

47 

7A 

ODIO 1010 

• 

106 

IA 

Olio 1010 

1 

ITO 

AA 

1010 1010 

274 

EA 

Il 10 IOIO 

41 

20 

0010 1011 

4- 

HIT 

*a 

ono lon 

6 

171 

AB 

1010 ioti 


U 

ino ioti 

44 

2C 

ooio iioo 


104 

M. 

ono noe 

1 

177 

At: 

ioio noo 

» 

Et 

monco 

47 

TU 

0010 noi 

. 

104 

«O 

ono noi 


171 

AD 

ioio noi 

21? 

EE 

ino noi 

4 6 

11 

OOIOIIIO 


no 

lE 

461149 1110 


174 

Af 

ioio ino 

278 

EE 

limino 

47 

2f 

odio mi 

/ 

III 


OIIQIIII 

o 

177 

AF 

violili 

2)9 

EF 

monn 

48 

IO 

00110000 

0 

117 

70 

01 II 0000 

P 

176 

BO 

ioi loooo 


FO 

mioooo 

44 

II 

UDII 0001 

1 

III 

71 

Oli! 0001 

4 

in 

Bl 

lonoooi 

741 

FI 

nuoooi 

70 

12 

0011 0010 

2 

114 

72 

oi n ooio 


176 

B2 

ioti OOIO 

241 

F2 

miooio 

71 

II 

00110011 

1 

Iti 

77 

oinoon 


174 

BJ 

lonoon 

24.' 

F) 

mioou 

72 

>4 

0011 0100 

4 

116 

74 

01 11 0100 


180 

fu 

IOI IO 100 


F4 

imoitio 

7» 

11 

OOIIOIOI 

» 

117 

77 

omoioi 


161 

B7 

1011 0101 

IV 

F7 

mioioi 

74 

II 

Obli Olio 

1 

116 

74 

OHI Olio 


162 

86 

ioii ono 

-*■ 

F6 

intono 

77 

17 

ooii oi 11 

7 

114 

77 

onioni 


I8« 

87 

ìononi 

247 

F7 

un om 

7* 

II 

0011 1000 

■ 

120 

76 

Olii I00O 


164 

M 

ioti IOOO 

24» 

F* 

llll IOOO 

77 

» 

0011 IODI 

7 

ITI 

74 

OHI IOOI 

» 

167 

B9 

IOII IOOI 

» 

F9 

llll IOOI 

7* 

IA 

0011 1010 

: 

122 

7A 

ohi mio 


161 

BA 

IOII IOIO 

27C 

FA 

llll IOIO 

W 

IO 

0011 10111 

. 

121 

78 

om ioti 

I 

167 

88 

ioii ioti 

271 

FB 

llll IOII 

IO 

M. 

00111100 

< 

124 

7C 

om noo 


1*4 

Bt 

ioii noo 

272 

K 

un noo 

II 

H) 

ooii imi 

= 

121 

7D 

om noi 


164 

8D 

ioii noi 

271 

FD 

mi noi 

12 

H 

UOIIIlio 

> 

126 

7t 

OHI ino 


140 

II! 

ioii ino 

274 

FE 

un mo 

M 

IF 

uon mi] 

» 

127 

7F 

OHI fili 

OEL 

101 

BF 

IOII llll 

277 

FF 

llllllll 


a Decimale 
b Esadecimale 
c Binario (8 bit) 

d Caratteri ASCII 








Nota: 


1 caratteri all'interno del quadrato variano a seconda del set 
nazionale di tastiera adottato (vedi Appendice B). 
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B. EQUIVALENZE DEI CARATTERI 
IN CODICE ASCII 




EQUIVALENZE DEI CARATTERI IN CODICE ASCIT 


CODICE 

ASCII 


EQUIVALENTE 


DECIMALE 

ESADECIMAL 

USA 

ITALIA 

FRANCIA 

INGHILTERRA 

GERMANIA <1 

GERMANIA 12 

SPAGNA 

PORTOGALLO 

DANIMARCA 

SVEZIA 

FINLANDIA 

NORVEGIA 

SVIZZERA 

FRANCESE 

SVIZZERA 

TEDESCA 

GRECIA 

IUGOSLAVIA 

35 

23 

© 

£ 

£ 

£ 

n 

P 

£ 

P 

£ 

n 

£ 

£ 

£ 

£ 

# 

36 

24 

© 

$ 

s 

$ 

$ 

$ 

S 

$ 

S 

n 

$ 

$ 

$ 

$ 

n 

64 

40 

© 

i 

à 

« 

§ 

5 

§ 

5 

• 

• 

• 

§ 

5 

• 

5 

91 

5B 

i 

• 

• 

i 

X 

X 

i 

l 

X 

X 

K. 

à 

à 

t 

0 

92 

5C 

© 

9 

9 

\ 

0 

0 

N 

<. 

0 

0 

0 

9 

9 

\ 

e 

93 

50 

1 

é 

f 

i 

u 

V 

C 

6 

l 

V 

A 

è 

è 

1 

2 

96 

60 

* 

u 













s 

123 

7B 

( 

à 

é 

i 

à 

a 

0 

3 

9 

à 

9 

a 

à 

i 

<J 

124 

7C 

1 

ò 

ù 

1 

6 

ò 

FI 

i • 

d 

0 

i 

ò 

0 

1 

c 

125 

70 

i 

è 

è 

i 

G 

u 

9 

c* 

IO 

é 

A 

è 

u 

D 

i 

2 

126 

* 

- 

i 


- 

B 

B 

- 

• 


- 

- 

é 

è 

- 

C 


• I caratteri compresi in un cerchio sono usati per funzioni in linguaggio BASIC 
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C. CODICI D’ERRORE E SIGNIFICATO 


SOMMARIO 


Questa appendice riporta tutti gli errori del BASIC e del PCOS. 

In caso d'errore in ambiente BASIC viene visualizzato solo il messaggio 
senza il codice corrispondente. 

In caso d'errore in ambiente PCOS viene visualizzato solo il codice senza 
il messaggio corrispondente (a meno che il comando EPR1NT non sia 
residente; in questo caso viene visualizzato anche il messaggio). 


INDICE 

ERRORI PCOS E BASIC C-1 
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CODICI D'ERRORE E SIGNIFICATO 


ERRORI PCOS E BASIC 


CODICE 

DESCRIZIONE 

(PCOS e/o BASIC) 

COMMENTO 

1 

NEXT without FCR 
(BASIC) 

Una variabile in un'istruzione NEXT non 
corrisponde ad alcuna variabile in una 
istruzione FOR eseguita in precedenza. 

2 

Syntax error 
(BASIC) 

Viene incontrata una linea che contiene 
alcune sequenze non corrette di carat¬ 
teri (così come parentesi non accoppia¬ 
te, parole chiave errate, separatori 
errati, ecc.). 

3 

RETURN without GOSUB 
(BASIC) 

Viene incontrata un'istruzione RETURN 
senza una corrispondente istruzione 
GOSUB. 

4 

Out of DATA 
(BASIC) 

Viene eseguita un'istruzione READ quan¬ 
do non ci sono più istruzioni DATA con 
dati da leggere. 

5 

lllegal function cali 
(BASIC) 

Un argomento fuori del range prescritto 
viene passato ad una funzione numerica 
o stringa. 

Un errore di questo tipo può succedere 
anche quando: 

a. un indice di matrici risulti negati¬ 
vo o eccezionalmente grande; 

b. una funzione LOG abbia un argomento 
negativo o nullo; 

c. una funzione SQR abbia un argomento 
negativo; 

d. una mantissa negativa abbia un 
esponente non intero; 

e. è stato dato un argomento non cor¬ 
retto a una delle seguenti funzioni: 
M1DS, LEFTS, R1GHT$, TAB, SPC, 
STR1NG$, SPACE$, INSTR, oppure alla 
funzione ON...GOTO. 
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CODICE 

DESCRIZIONE 

(PCOS e/o BASIC) 

COMMENTO 

6 

Overflow 

(BASIC) 

Il risultato di un calcolo è troppo 
grande per essere rappresentato in un 
numero. 

Se si verifica un underflow, il risul¬ 
tato viene assunto pari a zero e 
l'esecuzione continua. 

7 

Out of memory 
(PCOS/BAS1C) 

In BASIC: un programma è troppo grande, 
ha troppi loop o subroutine, o troppe 
variabili, o espressioni troppo com¬ 
plesse. 

In PCOS: è stato richiamato un comando 
PCOS o una routine Assembler che non 
può essere allocato/a nella memoria 
disponibile. 

8 

Undefined line number 
(BASIC) 

Una istruzione GOTO, GOSUB, ON... GOTO, 
0N...G0SUB, 1F...THEN... ELSE, IF...- 
G0T0...ELSE, o DELETE fa riferimento a 
una linea inesistente. 

9 

Subscript out of range 
(BASIC) 

E’ stato indicato un elemento di 
matrice o con un indice fuori dalle 
dimensioni della matrice, o con un 
numero sbagliato di indici. 

10 

Duplicate definition 
(BASIC) 

Due o più di due istruzioni DIM fanno 
riferimento alla stessa matrice oppure 
viene eseguita un'istruzione DIM dopo 
che per una data matrice si sono 
assunte le dimensioni di default. 

11 

Oivision by zero 
(BASIC) 

Viene incontrata una divisione per 
zero, oppure si ha un'elevamento a 
potenza dove il valore della base è 
zero e l’esponente è negativo. In ogni 
caso il risultato è l'infinito di 
macchina: con il segno del numeratore 
per la divisione per zero, con il segno 
positivo nel caso dell'elevamento a 
potenza. 
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CODICI D'ERRORE E SIGNIFICATO 


CODICE 

DESCRIZIONE 

(PCOS e/o BASIC) 

COMMENTO 

12 

Illegal direct 
(BASIC) 

Viene introdotta una istruzione che non 
è legale in Modo Immediato. 

13 

Type mismatch 
(PCOS/BASIC) 

In BASIC: a una variabile numerica 
viene assegnato un valore stringa; a 
una funzione che richiede un parametro 
numerico viene passato un argomento 
stringa. 

In PCOS: è 'stato impostato un valore 
stringa quando è richiesto un valore 
numerico e viceversa. 

14 

Out of string space 
(BASIC) 

Variabili stringa hanno fatto in modo 
che il BASIC superasse la memoria 
utente disponibile. 11 BASIC alloca lo 
spazio delle stringhe in modo dinamico, 
finché non succede un errore di questo 
tipo. 

15 

String too long 
(BASIC) 

Si è tentato di creare una stringa con 
più di 255 caratteri. 

16 

String formula too 
complex 

(BASIC) 

Una espressione stringa è troppo lunga 
o troppo complessa. E’ opportuno divi¬ 
derla in più espressioni semplici. 

17 

Can't continue 
(BASIC) 

Si è cercato di riprendere l'esecuzione 
di un programma: 

1. che è stato modificato dopo un 

HCll M 

2. che non esiste in memoria. 

18 

Lindefined function 
(BASIC) 

Viene richiamata una funzione prima 
della corrispondente definizione. 

19 

No RÉSUMÉ 

(BASIC) 

Il controllo è stato passato a una 
routine di gestione degli errori che 
non contiene una istruzione RÉSUMÉ. 




















CODICE 

DESCRIZIONE 

(PCOS e/o BASIC) 

COMMENTO 

20 

RÉSUMÉ without error 
(BASIC) 

Viene incontrata una istruzione RÉSUMÉ 
prima di entrare in una routine di 
gestione degli errori. 

22 

Missing operand 
(BASIC) 

Una espressione contiene un operatore 
non seguito da operando. 

23 

Buffer overflow 
(BASIC) 

Si è tentato di introdurre una linea 
che ha più di 255 caratteri. 

26 

FOR without NEXT 
(BASIC) 

Si è incontrata un’istruzione FOR senza 
una corrispondente NEXT. 

29 

UMILE without UEND 
(BASIC) 

Una istruzione UH1LE non ha una corri¬ 
spondente UEND. 

30 

WEND without UMILE 
(BASIC) 

Una istruzione UEND non ha una corri¬ 
spondente UH1LE. 

31 

IEEE Invalid talker/ 
listener address 
(BASIC) 

Uso illegale di indirizzo di tra¬ 
smettitore/ricevitore. 

32 

IEEE: talker = listener 
address 

(BASIC) 

Si è tentato di trasmettere a un 
trasmettitore o di ricevere da un 
ricevitore. 

33 

IEEE: Unprintable error 
(BASIC) 

Un messaggio d'errore non è stampabile, 
ossia corrisponde a un codine d'errore 
non definito. 

34 

IEEE: Board not present 
(BASIC) 

Si è tentato di usare il package IEEE 
su una macchina che non ha l'interfac¬ 
cia IEEE. 

35 

Uindow not open 
(PC0S/BAS1C) 

Si è cercato di utilizzare una finestra 
non ancora aperta (può succedere anche 
in PCOS, quando si esegue un programma 
Assembler). 

36 

Unable to create window 
(PCOS/BASIC) 

Le dimensioni della finestra da creare 
non sono corrette (può succedere anche 
in PCOS, quando si esegue un programma 
Assembler). 
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CODICI D'ERRORE E SIGNIFICATO 


CODICE 

DESCRIZIONE 

(PCOS e/o BASIC) 


COMMENTO 

37 

Invalici action-verb 
(BASIC) 


Una clausola Action Verb è stata 
impostata in modo non corretto o non è 
stata usata nel modo giusto. 

38 

Parameter out of range 
(BASIC) 


Uno o più parametri sono andati oltre i 
limiti prescritti. 

39 

Too many dimensions 
(BASIC) 


Si è tentato di usare una matrice a più 
dimensioni nella grafica. 

50 

F1EL0 overflow 
(BASIC) 


Una istruzione F1ELD cerca di allocare 
più byte di quelli specificati per la 
lunghezza dei record per un file 
random. 

51 

Internai error 
(BASIC) 


Si è verificata una anomalia interna. 
Segnalare le condizioni d'errore al¬ 
l'Organizzazione di Assistenza. 

52 

Bad file number 
(BASIC) 


Un'istruzione o un comando fa riferi¬ 
mento a un file il cui numero non 
appartiene all'intervallo specificato 
all'inizializzazione, oppure il file 
corrispondente non è aperto. 

53 

File not found 
(PCOS/BASIC) 


Un comando PCOS o BASIC o una istruzio¬ 
ne OPEN fanno riferimento a un file che 
non esiste sul disco selezionato. 

54 

Bad file mode 
(PCOS/BASIC) 


In BASIC: si è cercato di usare 
istruzioni PUT, GET su un file sequen¬ 
ziale, di caricare con LOAD o RUN un 
file dati o di eseguire una OPEN con un 
metodo d'accesso diverso da I, 0, A o 
R. 




In PCOS: può succedere eseguendo un 
programma Assembler. 





















CODICE 

DESCRIZIONE 

(PCOS e/o BASIC) 

COMMENTO 

55 

File already open 
(PCOS/BAS1C) 

In BASIC: è stata eseguita una OPEN su 
un file già aperto, oppure è stato 
applicato un comando K1LL su un file 
aperto. 

In PCOS: può succedere eseguendo un 
programma Assembler. 

57 

Disk I/O error 
(PCOS/BAS1C) 

Si è verificato un errore di I/O 
durante un'operazione su disco. 

58 

File already exists 
(PCOS/BAS1C) 

Si è cercato di assegnare a un file un 
nome identico a uno che esiste già sul 
disco selezionato. 

59 

Disk type mismatch 
(PCOS) 

E' stata fatta un'operazione che ri¬ 
chiede due dischetti di uguale capacità 
con due dischi di capacità diversa. 

60 

Disk not initialised 
(PCOS) 

E' stato fatto un tentativo di accedere 
a un disco non inizializzato. 

61 

Disk filled 
(PCOS/BASIC) 

Tutto lo spazio disponibile su disco è 
già stato usato. 

62 

End of file 
(PCOS/BASIC) 

Si è verificato un End of File non 
corretto. 

63 

Invaiid record number 
(PCOS/BASIC) 

11 numero di record è minore o uguale a 
zero oppure è maggiore di 32768. 

64 

Invalid file name 
(PCOS/BASIC) 

E' stato usato un nome di file non 
valido (con troppi caratteri o con 
caratteri illegali). 

66 

Direct statement in 
file 

(BASIC) 

Durante il caricamento di un file pro¬ 
gramma è stata incontrata un'istruzione 
immediata (diretta). 

L'operazione di caricamento (tramite 
LOAD o RUN) viene interrotta. 
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CODICI D'ERRORE E SIGNIFICATO 


CODICE 

DESCRIZIONE 

(PCOS e/o BASIC) 

COMMENTO 

67 

Too many files 
(BASIC) 

Si è tentato di creare un nuovo file 
(con il comando SAVE o l'istruzione 
OPEN) quando la directory è già satura 

69 

Volume name not found 
(PCOS/BASIC) 

Il nome del disco specificato non è il 
nome di un disco in linea. 

70 

Renarne error 
(PCOS/BASIC) 

Si è cercato di attribuire un nome non 
valido a un disco durante una operazio¬ 
ne di renarne. 

71 

Invaiid volume number 
(PCOS/BASIC) 

11 numero di drive specificato non è 
ammesso. 

72 

Volume not enabled 
(PCOS/BASIC) 

E' stato fatto un tentativo di accedere 
a un volume non abilitato. 

73 

Invai id password 
(PCOS/BASIC) 

E' stata specificata una password non 
valida. 

74 

11legai disk change 
(PCOS/BASIC) 

E' stato cambiato il dischetto dal¬ 
l'ultima volta che il file è stato 
usato. 

75 

Urite protected file 
(PCOS/BASIC) 

E' stato fatto un tentativo di scrivere 
su un file protetto da scrittura. 

^_ 76 

Error in Parameter 
(PCOS/BASIC) 

Uno o più parametri contengono valori 
non ammessi. 

77 

Invaiid number of 
parameters 
(PCOS/BASIC) 

Sono stati indicati troppi parametri. 

78 

File not OPEN 
(PCOS/BASIC) 

Si è cercato di leggere o scrivere su 
un file non aperto. 

79 

Printer error 
(PCOS/BASIC) 

Errore di stampante, come per esempio 
mancanza di nastro inchiostrato. 

80 

Copy protected file 
(PCOS) 

E' stato fatto un tentativo di copiare 
un file che è protetto da copia. 
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CODICE 

DESCRIZIONE 

(PCOS e/o BASIC) 

COMMENTO 

81 

Paper empty 
(PCOS/BAS1C) 

Condizione di fine carta. 

82 

Printer fault 
(PC0S/BAS1C) 

Malfunzionamento della stampante. 

92 

Command not found 
(PCOS) 

Non è stato trovato il comando specifi¬ 
cato sui dischi in linea. 

99 

Bad load file 
(PCOS) 

f \ 

La versione del comando non corrisponde 
alla release di PCOS presente in 
memoria. 

101 

Error in time or date 
(PCOS) 

E' stata specificata un'ora o una data 
non corrette. 

108 

Cali-user error 
(PCOS) 

Si è verificato un errore sul richiamo 
di un comando PCOS o di una routine 

Assembler. 

110 

Time-out 
(PCOS) 

Si è verificato un errore di time-out 
(per esempio si è cercato di usare una 
stampante non collegata). 

111 

Invaiid device 
(PCOS) 

Il nome del device specificato non 
esiste. 
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D. DIFFERENZE TRA RELEASE DEL PCOS 



SOMMARIO 


Questa appendice indica le differenze tra la release di PCOS 1.3 e la 
release 2.0 e successive. 
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DIFFERENZE TRA RELEASE DEL PCOS 

DIFFERENZE TRA RELEASE 


PCOS RELEASE 1.3 

PCOS RELEASE 2.x E SUCCESSIVE 

L'hard disk non è supportato. 

L'hard disk è supportato (dalla R. 
2.x). 

1 dischetti da 160 Kbyte e da 

640 Kbyte non sono supportati. 

1 dischetti da 160 Kbyte sono 
supportati dalla R. 2.x e i di¬ 
schetti da 640 Kbyte dalla R. 3.x. 

11 video a 8 colori non è sup¬ 
portato. 

11 video a 8 colori è supportato 
dalla R. 2.x. 

1 linguaggi ASSEMBLER e PASCAL 
non sono supportati. 

11 linguaggio ASSEMBLER è supporta¬ 
to dalla R. 2.x e il linguaggio 
PASCAL dalla R. 3.x. 

1 seguenti comandi PCOS non sono 
supportati: 

1 seguenti comandi PCOS sono sup¬ 
portati (dalla R. 2.x): 

ASM, BVOLUME, CKEY, DC0NF1G, 
LSCREEN, PDEBUG, PUNLOAO, RFONT 
SLANG, LINK, VVER1FY, UFONT. 

ASM, BVOLUME, CKEY, DCONFIG, 

LSCREEN, PDEBUG, PUNLOAD, RFONT, 
SLANG, LINK, VVER1FY, WFONT. 

Inoltre sono state aggiunte le 
seguenti opzioni ai comandi: 

ED1T (opzione "%g" dalla R. 2.x e 
"%h" dalla R. 3.x) 

FL1ST (opzione "%h" dalla R. 3.x) 

PKEY (opzione "%c" dalla R. 3.x) 

SSYS (opzione "disk time” dalla R. 
3.x) 

11 comando FNEU è stato ampliato 
per consentire di creare una lista 
di file (dalla R. 3.x). 

Le tastiere Grecia e Iugoslavia 
e la versione Delta non sono 
supportate. 

Le tastiere Grecia e Iugoslavia 
sono supportate dalla R. 2.x e la 
versione Delta dalla R. 3.x. 
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PCOS RELEASE 1.3 


PCOS RELEASE 2.x E SUCCESSIVE 

Il comando BASIC è residente. 


11 comando BASIC è transiente 
(dalla R. 2.x). 

Il PCOS e il BASIC sono caricati 
insieme in memoria in fase di 
inizializzazione. 


Solo il PCOS viene caricato in 
memoria all'inizializzazione (dalla 
R. 2.x). 

All'inizializzazione l'ultimo drive 
selezionato è sempre il drive 0. 


All'inizializzazione l'ultimo drive 
selezionato è quello dal quale è 
stato caricato il PCOS (dalla R. 
2.x). 

11 prompt del PCOS è 

> 


11 prompt del PCOS è n > , dove n 
indica l'ultimo drive selezionato 
(dalla R. 2.x). 

Il valore di default del parametro 
"memory" nell’istruzione CLEAR è 
38000. 


11 valore di default del parametro 
"memory" nell'istruzione CLEAR è 
36800 (dalla R. Z.x) e 36000 (dalla 
R. 3.x). 

11 comando LABEL del PCOS non ha 
il parametro "colour". 


11 comando LABEL del PCOS ha il pa¬ 
rametro opzionale "colour" (dalla 
R. 2.x). 

I valori limite del parametro 
"position" nell'istruzione W1ND0W 
(per aprire una finestra), se vie¬ 
ne fatta una suddivisione orizzon¬ 
tale, è: 


I valori limite del parametro 
"position" nell'istruzione UINDOW 
(per aprire una finestra), se viene 
fatta una suddivisione orizzontale, 
è: 

limite inferiore = 

valore che indica lo spazio tra 
due linee contigue di testo + 1 


limite inferiore = 1 

limite superiore = 

valore che indica l'altezza del¬ 
la finestra genitrice diminuito 
del limite inferiore + 1 


limite superiore = 255 

(a partire dalla R. 2.0). 
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DIFFERENZE TRA RELEASE DEL PCOS 


PCOS RELEASE 1.3 

PCOS RELEASE 2.x E SUCCESSIVE 

Le stampanti PR 1481, PR 2300, 

PR 430, PR 2835, PR 320 e le mac¬ 
chine per scrivere elettroniche 

ET 121 ed ET 231 non sono suppor¬ 
tate. 

Le stampanti PR 1481, PR 2300, 
PR 430 e le macchine per scrivere 
elettroniche ET 121 ed ET 231 sono 
supportate dalla R. 2.x. 

Le stampanti PR 2835 e PR 320 sono 
supportate dalla R. 3.x. 

Non è possibile visualizzare i 
primi 32 caratteri della Tabel¬ 
la ASCII. 

A partire dalla R. 3.x è possibile 
abilitare (parametro "+cc") e disa¬ 
bilitare (parametro "-cc") la vi¬ 
sualizzazione dei primi 32 caratte¬ 
ri della tabella ASCII, in modo 
temporaneo (per l'esecuzione di un 
singolo comando PCOS) o permanente. 

Esistono due liste di messaggi di 
errore, una per il PCOS e una per 
il BASIC. 

La lista dei messaggi d'errore è 
stata unificata con alcune modi¬ 
fiche, a partire dalla R. 3.x. 

Il numero massimo di parametri in 
un comando PCOS è pari ad 11. 

Il numero massimo di parametri in 
un comando PCOS è pari a 20 dalla 
R. 2.x. 


UTILITY GETCONV-BAS 

Per assicurare la compatibulità tra release l.x, 2.x e successive del 
PCOS, quando un utente ha memorizzato su file delle immagini video otte¬ 
nute con le istruzioni BASIC GET/PUT della grafica è necessario converti¬ 
re questi file (sequenziali o random) con l'utility getconv.bas. 

Per convertire un file l’utente deve seguire la seguente procedura. 
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STEP 

AZIONE 

1 

Caricare in memoria il PCOS 2.x 

2 

Entrare in BASIC impostando: ba 

Lanciare l'utility impostando: RUN "getconv.bas" 

Nota: è anche possibile impostare direttamente da PCOS ge B;1 

3 

Impostare l’identificatore del file da convertire quando appare 
su video il messaggio di richiesta. 

4 

Impostare l'identificatore del file di output, quando appare su 
video il messaggio di richiesta. 

5 

Impostare "s" se il file da convertire è sequenziale ed "r" se è 
random. 

6 

Verificare quanto appare sul video, in particolare la dimensione 
della matrice unidimensionale a elementi interi che è stata 
memorizzata su file. Se la dimensione risulta superiore a quella 
indicata nel programma BASIC sarà necessario variare anche 
l'istruzione DIM nel programma. 

7 

Aspettare che la conversione sia finita, cioè che appaia il 
prompt del BASIC (Ok). 
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E. ISTRUZIONI, COMANDI E FUNZIONI BASIC 


SOMMARIO 


Questa appendice riporta, in ordine alfabetico, le istruzioni, i comandi 
e le funzioni BASIC, indicando la pagina (o le pagine) del manuale dove 
l'argomento viene illustrato in dettaglio. 

Se una istruzione, una funzione o un comando può essere usato sia in una 
linea di programmazione sia in una linea ad esecuzione immediata, viene 
specificato PR0GRAMMA/1MMED1AT0; se può essere usato solo in una linea ad 
esecuzione immediata, viene specificato IMMEDIATO; se può essere usato 
solo in una linea di programma, viene specificato PROGRAMMA. 
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AVVISO 


La Ing. C. Olivetti & C. S.p.A. si riserva il diritto di apportare mo¬ 
difiche al prodotto descritto in questo manuale in qualsiasi momento e 
senza preavviso. 

Questo materiale è stato preparato da Olivetti esclusivamente per l’uso 
da parte dei propri clienti. 

Olivetti garantisce che il presente materiale costituisce, alla data di 
edizione, la più aggiornata documentazione da essa elaborata relativa al 
prodotto cui si riferisce. 

E' inteso che l'uso di detto materiale avviene da parte dell'utente sotto 
la propria responsabilità. 

Nessuna ulteriore garanzia viene pertanto prestata da Olivetti (in par¬ 
ticolare per eventuali imperfezioni, incompletezze e/o difficoltà opera¬ 
tive), restando espressamente esclusa ogni sua responsabilità per danni 
diretti o indiretti comunque derivanti dall'uso di tale documentazione. 

Tutta la documentazione è coperta da copyright. 
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